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ANNUNCIO 

IMPORTANTE 

Annunciamo a tutti i lettori e a coloro che ci hanno sollecitato di 
favorire la pubblicazione su iiLIST» di un metodo pratico 
per apprendere meglio l'uso del Computer che dal 
prossimo numero troveranno, spillata al centro 
della Rivista, la T dispensa del 

CORSO PRATICO 
per L’USO DEL 
COMPUTER 


Piccola indagine 
tra i lettori di 



QUANTI e QUALI...?!!! 


Gentili lettori, 

come avrete notato, questa rivista vive esclusivamente con la 
pubblicazione di programmi educativi, culturali e didattici. 

Forse ci manca un po’ di ordine ed è per questo che chiediamo la 
vostra collaborazione. Sappiamo tutti quali sono le marche degli 
home-computers più diffusi nel nostro paese e quale 
assortimento diversificato esiste sia nell’hardware che nel 
software disponibile sul mercato. 

LIST si propone di offrire ai suoi lettori una migliore ripartizione di 
software compatibili con i tipi di H.C. in loro possesso. 

Con questo ci proponiamo (in un certo senso) di personalizzare 



la rivista ai vostri computers e renderci sempre più disponibili 
alle vostre esigenze. 

Certi della vostra collaborazione, vi invitiamo ad inviarci al più 
presto il modulo pubblicato in questa pagina riempito in ogni sua 
parte o trascriverlo su cartolina postale, indirizzandola a: 
LIST-Programmi: per il tuo home computer, 

Via F. Stilicone, 111-00175 ROMA 

Non dimenticate nome, cognome ed indirizzo. 

La Redazione ringrazia quanti vorrano collaborare. 


MARCA e TIPO di H.C. 

» » DRIVE . 

» »> STAMPANTE ... 

>> » REGISTR. 

» »> MONITOR. 

Età e uso prevalente del computer 

Nome e Cognome. 

Via . 

Città . 

Tel. 


cap. 


































EDITORIALE 



L informatica, dunque, è entrata nella scuola 
italiana ma è difficile dire fin da ora quali effetti avrà 
sull’istruzione dei nostri ragazzi. 

Il Piano Nazionale per introdurre l 'informatica nelle 
nostre aule trova la Scuola Italiana, come ha detto lo 
stesso Ministro, in posizione «né precipitosa, né cedevole», 
evitando anche «le mode passeggere», ma è pur vero che 
arriviamo all'informatica nelle scuole a molte lunghezze da 
altri paesi, come noi tecnologicamente avanzati. La nostra 
scuola, inoltre soffre da troppo tempo di quella singolare 
sindrome da «educazione scientifica» per cui quasi sempre 
sono stati privilegiati gli studi umanistici trascurando, 
nelle scuole secondarie soprattutto, tutto, o quasi tutto ha 
a che fare con la scienza e la tecnologia. 

Il piano Falcucci per l 'informatica nelle scuole decolla ed è 
un gran bene, non v’è dubbio alcuno, ma è un piano «a 
incastro» che prevede una strategia graduale con 
insegnanti che devono essere prima informatizzati per poi 
informatizzare. E non è detto — anche se non ce lo 
auguriamo — che tutto proceda alla perfezione. 

C’è da considerare, infine, l'idea che i ragazzi hanno 
dell 'informatica; a parole tutti, ragazzi e genitori, 
affermano che l'informatica ha rivoluzionato la società, 
che il computer migliora la qualità della vita. Ma due 
giovani su tre, tra i 15 e i 18 anni, dice un recente 
sondaggio, alla domanda: «tra un computer e un hi-Jì, cosa 
sceglieresti?» hanno risposto: «l'hi-fi»... In sostanza pare 
di capire che dell 'informatica ragazzi e adulti, nel nostro 
paese hanno un idea approssimativa alla quale, tra l’altro, 
legano preoccupazioni che non sanno ben valutare come la 
disoccupazione e la spersonalizzazione del lavoro. A 
questo proposito LIST vuole dare il suo contributo alla 
«alfabetizzazione» informatica. Per questa ragione dal 
prossimo numero i lettori delta nostra rivista troveranno la 
prima di una serie di dispense dal titolo «CORSO 
PRATICO PER L'USO DEL COMPUTER». In questo 
modo LIST cerca di aiutare chi, con impegno e volontà 
d'apprendere, si avvicina all'informatica. 

Come spesso accade, infatti, molti parlano per «sentito 
dire» senza preoccuparsi di approfondire. L avvento 
dell'informatica è visto correttamente come una 
rivoluzione fondamentale in grado di mutare, così come 
hanno fatto nel tempo l'agricoltura e l'industria, il modo di 
vivere e di pensare dell'umanità. Ma contemporaneamente 
quasi tutti non mostrano alcuna propensione per capire e 
imparare. E badano al loro orto. Certe diavolerie, come si 
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INFORMAZIONI SHARP 



Spettabile Redazione, 
vi porgo i miei complimenti per 
l’ottima rivista che non perdo fin 
dal primo numero. 

Sono il possessore di uno 
SHARP MZ-700 ed ho incontrato alcune 
difficoltà nel digitare il programma 
«SCI ALPINO» (N. 4 aprile ’85) a causa 
della scarsa qualità di alcuni caratteri 
di stampa. Con un po' di pazienza sono 
comunque riuscito a colmare questa 
lacuna, ma non credete che sarebbe il 
caso di utilizzare una stampante di 
buona qualità per trascrivere i 
programmi? 

A parte questa piccola lamentela, 
gradirei una risposta in merito a 
quanto segue: 

1) è nelle Vs. intenzioni future 
pubblicare programmi tipo «DATA 
BASE»...? 

2) ho saputo che esiste in commercio il 
«QUICK DISK» (disco da 3”): adottando 
tale tipo di memoria di massa, il 
computer avrà un potenziamento del 
BASIC per la gestione dei dischi? 

Vorrei inoltre farVi notare che alcuni 
miei amici, possessori di altri 
computers, si sono lamentati in quanto 
il programma «TOTOVIC» (N. 6- 
Dicembre 84) non gira e segnala 
errore alla linea 1400. Come mai non 
ne è stata pubblicata l’Errata Corrige? 
Ringraziando anticipatamente per il 
tempo dedicatomi 

Marco Buricelli 
Roma 


Gent.mo Sig. Marco, 
grazie per i complimenti espressi 
ed anche per i quesiti così 
gentilmente posti. 

Riguardo al programma «SCI 
ALPINO» la «colpa » della scarsa 
leggibilità di alcune parti del 
listato non è da imputarsi tanto alla 
qualità della stampante (per altro 
SHARP), quanto al processo di 
riduzione tipografica ed alla 
successiva stampa. Può sempre 
capitare che qualche copia della 
rivista sia poco chiara e leggibile e 
proprio per evitare il ripetersi di 
tale evenienza si è ripreso a 
stampare i listati dedicati al Suo 
computer adottando un rapporto di 
riduzione minore, a tutto vantaggio 
della « chiarezza» degli stessi. 

È nostra ferma intenzione 
pubblicare programmi gestionali 
ed applicativi per lo SHARP cZ-700, 
ed anzi Le anticipiamo fin 



APOSTAPC 


d'ora un programma per la 
gestione dei fornitori e di un 
magazzino. 

Effettivamente esiste il «QUICK 
DISK DRIVE» per mini-dischi da 3,5 
pollici, ma siamo costretti a dover 
disilludere in parte le Sue 
aspettative in quanto la maggior 
parte di questi prodotti è concepita 
come elemento sostitutivo al 
normale registratore a cassette. 
Solo in pochi casi il lettore è dotato 
di un proprio microprocessore 
capace di gestire un adatto 
Firm-ware o comunque una forma 
di DOS. 

Riguardo infine al programma 
«TOTOVIC», dopo un controllo 
della linea 1400 non è stato 
riscontrato alcun errore. Ecco il 
motivo per cui non ne è stata 
pubblicata l'Errata Corrige: anzi a 
dire il vero, nei primi mesi di 
quest'anno, un gruppo di lettori ci 
ha telefonato comunicando di aver 
fatto «12» proprio grazie al 
programma in questione. 

Ci dispiace per i problemi 
incontrati dai suoi amici, ma siamo 
costretti a consigliare loro di 
ricontrollare attentamente quanto 
digitato anche perché, da quanto ci 
risulta, quello stesso programma è 
stato successivamente ripubblicato 
per «copia fotostatica» da una 
notissima rivista «concorrente» di 
cui omettiamo la testata per 
correttezza ed anche perché siamo 
convinti che con il marasma 
regnante attualmente nel campo 
dell'editoria informatica è facile 
cadere, magari in buona fede, 
nelle trappole poste da utenti con 
pochi scrupoli di coscienza, 
smaniosi di vedere il proprio nome 
pubblicato su una rivista, 
specialmente se questa è 
largamente diffusa. 


SHARP LOGO?! 



Gentili Signori, 

possiedo uno SHARP MZ-731 e 
vorrei utilizzarlo per seguire 
«attivamente» la Vostra rubrica 
«I SPEAK LOGO». 


Poiché nel primo articolo pubblicato su 
LIST N. 1/1985 dite che ciò è possibile 
mediante un programma «Interprete», 
Vi sarei grata se mi indicaste dove 
potrei procurarmi tale programma. Nel 
caso non esistesse, sarebbe possibile 
pubblicarlo su LIST? 

Vorrei inoltre sapere dove poter 
reperire un elenco completo dei 
programmi dedicati allo SHARP, con 
particolare riguardo ai programmi 
didattici. 

Ringrazio anticipatamente 

Lara Frattini 
Milano 


Cara Lara, 

ci siamo fatti portavoce delle tue 
richieste con il curatore della 
rubrica «I SPEAK LOGO», il Prof. 
Paolo Ciancarini, dal quale 
abbiamo saputo che purtroppo al 
momento non sembra sia 
disponibile un interprete LOGO 
adatto al tuo computer. Il motivo di 
questa «mancanza» ci sembra 
molto semplice: il LOGO è un 
linguaggio di elevate capacità 
grafiche mentre lo SHARP, come 
ben saprai, «soffre» invece della 
totale mancanza di grafica ad alta 
risoluzione. Le due cose, come 
vedi, sono del tutto incompatibili. 

Ti consigliamo in ogni caso di 
rivolgerti, al Distributore nazionale 
- la Melchioni, che fra l'altro ha 
sede proprio a Milano - sia per 
ulteriori ragguagli riguardo al 
LOGO, sia per informazioni 
dettagliate in merito ai programmi 
didattici utilizzabili con il tuo 
SHARP. 

Per quel che riguarda la 
pubblicazione su LIST di un 
mini-interprete LOGO, i nostri 
programmatori stanno già 
vagliando l'idea cercando di 
sfruttare il Plotter proprio della 
serie MZ-731 in luogo dello 
schermo grafico. Continua dunque 
a seguirci, cara Lara, perché con 
molta probabilità vedrai esaudite le 
tue richieste. 


«CLOCK» PER CBM 64 



...Vi porgo i miei più vivi 
complimenti per l’ottima rivista 
che ho acquistato per la prima 
volta solo alla fine dello scorso 
mese di Luglio (N. 6/7). 


4 


LIST 10/11 














STAPOSTAPOSTAPOSTAPOST) 


Vi sarei grato se poteste dirmi se esiste 
una versione del programma «HI RES 
CLOCK» - per C 16 - per il mio CBM 64 
ed, in caso affermativo, se il listato 
sarà pubblicato in uno dei prossimi 
numeri di LIST. 

Mi permetto inoltre di comunicare una 
mia piccola scoperta: grazie 
all'istruzione POKE 56325,10 sono 
riuscito ad accelerare la velocità del 
cursore. 

Vi ringrazio in anticipo e Vi porgo i miei 
più cordiali saluti. 

Carlo Benesso 
Milano 


Gent.mo Sig. Carlo, 
dalla Sua cortese lettera ci sembra 
di capire che Lei è un 
programmatore provetto: per tale 
motivo non Le sarà difficile 
adattare il programma in questione 
al Suo CBM, grazie all'ausilio del 
«SIMON'S BASIC». La conversione 
risulterà piuttosto semplice: 
basterà solo adattare i comandi 
grafici del C 16- quali DRAVZ 1, H,l 
TO VA, UB - con quelli contemplati 
dal SIMON’S-LINE H,l, VA, UB, 1. 
Fatto questo non sarà difficile 
convertire anche le routines 
sonore (ammesso che Le restino 
utili) e le altre eventuali routines di 
introduzione dati e visualizzazione. 
Non avendo acquistato altri numeri 
di LIST, non ha avuto modo di 
leggere la piccola raccolta di 
«Trucchi e Scoperte» pubblicata 
sul N. 5/1985, in cui si faceva per 
l'appunto riferimento al modo di 
alterare i registri dell'lnterrupt e 
quindi dell'orologio interno, 
modificando il valore contenuto 
nella locazione 56325. 

Sperando che continuerà ad 
essere un nostro affezionato 
lettore, La ringraziamo per i 
complimenti espressi nella Sua 
gentile lettera. 


SOLO LE«TONDE» 
PER IL VIC 20 


Sono appassionata di 
astronomia e naturalmente 
di computers e videogiochi. 
Vorrei accomunare le due 
passioni. 

Un mio amico mi ha regalato alcuni 
programmi di Astronomia che però 



purtroppo non girano sul mio VIC 20. 
Non ho la stampante e cosi li ho 
ricopiati a mano spendendoveli per 
chiedervi se potete adattarli al mio 
computer... 

Con cosa posso sostituire il segno ( A ) ? 
Quando a scuola il professore di 
matematica ci chiede di risolvere delle 
espressioni difficili, cosa devo fare con 
le parentesi tonde, quadre, graffe e con 
le frazioni?... 

Sofia Basiglio 
Dattilo (TP) 

La lettera di Sofia (una lettrice di 11 
anni e mezzo) è stata ridotta per 
esigenze legate allo spazio a 
nostra disposizione. 

Si tratta di una lettera molto 
garbata e simpatica a cui con molto 
piacere rispondiamo. 

Ci dispiace innanzitutto che sia 
stata costretta a ricopiare tutto quel 
«fascicolo» di istruzioni BASIC. Gli 
sarà costato non poco sia in termini 
di tempo che di fatica. 

Purtroppo per ovvi motivi legati al 
fatto che su molti programmi è 
presente l'indicazione dell’autore 
non li possiamo prendere in 
considerazione per una eventuale 
pubblicazione. 

A tal proposito ricordiamo ai lettori 
che intendono inviarci i loro 
programmi che, per ragioni 
organizzative, saranno cestinati 
tutti quelli non accompagnati da 
una copia su supporto magnetico 
(nastro o floppy disk). Assicuriamo 
però a Sofia che il suo problema è 
già stato preso in considerazione e 
presto vedrà dei programmi 
sull'argomento desiderato. 

Il segno (~) nel linguaggio dei 
calcolatori ha il significato di 
elevamento a potenza, e sul VIC 20 
corrisponde alla freccia, sul lato 
destro della tastiera, che si trova 
vicino a quel grosso tasto con 
sopra scritto RESTORE. 

Per le espressioni algebriche, 

Sofia deve sapere che i vari tipi di 
parentesi sono un modo per 
rendere più facile la comprensione 
dell’ordine con cui eseguire le 
operazioni. Il computer esegue le 
operazioni riconoscendo le sole 
parentesi tonde, perciò sarà 
sufficiente sostituire tutte le 
parentesi con quelle tonde: alla 
fine però sarà visualizzato 
il solo risultato senza che 


appaia l'ordine con cui sono state 
eseguite le operazioni; quindi 
consigliamo alla nostra piccola 
lettrice di usare il VIC 20 solo per 
controllare i risultati. 

Le frazioni possono essere 
tranquillamente scritte usando il 
segno (!) invece che la linea di 
frazione. 

Non esiste una specifica istruzione 
che risolva direttamente le radici 
cubiche, ma si può sempre 
chiedere al proprio insegnante un 
piccolo aiuto per scrivere un 
programmino che le risolva. Nel 
caso Sofia ci riuscisse saremmo 
contenti se ce lo facesse sapere 
(prima o poi pubblicheremo 
comunque qualcosa del genere). 


NON CREA SINUSOIDI 
IL VIC INESPANSO 


Sono un fortunato possessore 
del VIC 20 e vorrei che 
pubblicaste il listato 
completo del programma 
crea sinusoidi della rubrica 
Scuola e Computer apparso sul n. 5 
Sett/Ott. della vostra rivista. 

Domenico Angotti 
S. Giovanni in Fiore (CS) 

Tralasciando l'aspetto giocoso 
della lettera inviataci dal sig. 
Angotti, che definisce la nostra 
rivista «afrodisiaca» (...Mah!!!), 
ricordiamo al lettore che è quasi 
impossibile implementare il 
programma in questione sul VIC 20 
se quest'ultimo è sfornito di 
espansione grafica. 

Ancora peggio se il VIC è in 
versione base e quindi con soli 
3.5K di memoria utente. 

Non essendo a conoscenza di tali 
particolari, ritenuti dal sig. Angotti 
di secondaria importanza, non ci 
resta che consigliare al lettore di 
consultare questa stessa rubrica 
sul numero 4/1985 a pag. 14 - 
risposta al sig. Pai miro Monti che 
aveva lo stesso problema sebbene 
fosse dotato di espansione grafica. 
Inoltre di valido aiuto sarebbe la 
lettura dell'articolo pubblicato 
nella rubrica Handbook del n. 
5/19885 a pag. 31, dove si spiega 
come creare una pagina grafica su 
cui disegnare i grafici di funzioni 
matematiche. 
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SOFTWARE DISPONIBILE 
ANCHE PER IL SEGA 


, ...Possiedo un computer SEGA 
SC 3000 acquistato nel Dicembre 
1983. 

Inizialmente ero entusiasta di 
questo computer, ma poi, con il 
passare del tempo, mi sono accorto 
che esistevano dei problemi, e cioè: 

1) la reperibilità sul mercato di 
materiale software di vario genere; 

2) pur avendo il computer comandi in 
più rispetto ad àltri, manca delle 
istruzioni OPEN e CLOSE per cui non si 
possono creare ed usare files (ritengo 
importante questo tipo di comando): 

3) il manuale in dotazione risulta 
abbastanza chiaro finché si tratta di 
linguaggio BASIC, ma quando si deve 
programmare il Linguaggio Macchina 
l’unica istruzione a comparire è 
«CALL» e nient’altro: 

4) lo schema elettrico del circuito è 
irreperibile. Ho provato a risolvere 
quest'ultimo problema rivolgendomi a 
rivenditori e tecnici di Roma... 

Infine ho scritto in Giappone, a Tokyo, 
ma ancora oggi aspetto un cenno... 

Alberto Nardi ni 
Torvaianica (RM) 



Carissimo lettore, 
la ringraziamo per i complimenti 
espressi nella sua lettera e che 
comunque ci fanno sempre molto 
piacere. 

I problemi lamentati sono 
purtroppo comuni a molti 
possessori del SEGA, anche se 
sinceramente per certi aspetti le 
cose stanno gradatamente 
migliorando. 

Una notizia questa, che contribuirà 
a risollevare il morale della nutrita 
schiera di lettori con gli stessi 
problemi. Dovrebbe essere 
iniziata, curata dall'Importatore 
ufficiale, la distribuzione di 
software della casa madre, e 
prodotto in Italia, adatto a questo 
computer. 

Tra i titoli disponibili vanno 
ricordati: Congo Bongo, Yamato, 
N-Sub, Star-Jacker, Baseball e 
Monaco GP su cartuccia: 
Kamikaze, World Defender, 
Othello, Bombers, Gestione Mutui, 
Ingegneria, Matematica, 
Elettrotecnica, Bilancio, Archivio, 
Contributi per collaboratrici 



domestiche, Bioritmi ed altri titoli 
su nastro. 

I prezzi dovrebbero oscillare tra le 
quaranta e le settantamila lire. 

II computer manca in realtà dei 
comandi specifici per la gestione 
dei files, ma sappiamo per certo 
che nel firmware del sistema, tali 
comandi sono contemplati, ed 
agendo in L.M. su determinate 
locazioni con opportune istruzioni 
CALL, è possibile usarli nella 
gestione di files su registratore a 
cassette (peraltro troppo lenta). 

Ci riserviamo in un prossimo futuro 
di approfondire l'argomento, 
proponendo eventualmente un 
semplice programma dimostrativo. 
Riguardo al manuale in dotazione, 
il sig. Nardini mostra una enorme 
buona volontà nelTaffermare che 
risulta abbastanza chiaro finché si 
tratta di linguaggio BASIC. 

A nostro avviso, il « ridicolo» 
libretto in dotazione al computer, è 
quanto di peggio sia stato visto tra i 
manuali per computers. 

La programmazione in L.M. 
diventa impossibile se si segue 
solo il manuale. 

L'istruzione CALL è evidentemente 
usata per richiamare delle routines 
del sistema operativo. 

Unico vero problema è che ancora 
non siamo riusciti a reperire una 
vera e propria mappa di memoria 
con illustrate le locazioni di 
memoria più importanti per il 
funzionamento. Possiamo 
affermare con sicurezza che 
esistono due versioni del SEGA 
SC-3000. 

Esse si differenziano per la 
diversità del processore video: il 
TMS 9929 per il mercato europeo 
(standard PAL-RGB). ed il TMS 
9918 per il mercato americano 
(standard NTSC). 

Lo schema elettrico per il quale lei 
afferma di aver scritto anche in 
Giappone alla casa madre, pare 
venga distribuito esclusivamente ai 
punti di assistenza, probabilmente 
però, se lo richiederà nuovamente 
all'importatore è probabile che lo 
riceva. 

La invitiamo comunque a voler 
continuare a seguirci perché con 


molta probabilità in uno dei prossi¬ 
mi numeri, cureremo, nella rubrica 
Handbook, la pubblicazione delle 
parti più importanti dello schema 
elettrico del Sega SC 3000. 


SISTEMA DI SICUREZZA 



Possiedo un «povero» VIC 20 ed 
ho da poco terminato la 
compilazione di un programma 
che fornisce informazioni 
all’utente dietro l’inserimento 
di una parola d'accesso. 

Al fine di disabilitare le funzioni RUN 
STOP/RESTORE ho pensato di inserire 
nel programma una linea zero: in tal 
modo si evita che qualcuno riesca ad 
«entrare» nel programma mentre 
questo è in esecuzione. 

Esiste però un altro problema. Per 
lanciare il programma è necessario 
digitare il RUN dopo averlo caricato; 
ciò permette all'eventuale pirata di 
listare il programma e scoprire cosi la 
parola d’ordine. 

Potreste indicarmi una routine per 
l’AUTORUN in modo da neutralizzare 
anche l'istruzione LIST? 

Tommaso Biolghini 
Torino 


Purtroppo, caro Tommaso, non 
esiste per il VIC 20 un 'istruzione 
POKE che permetta di lanciare 
automaticamente un programma. 
Una routine in Codice Macchina 
occuperebbe dai 90 ai 100 bytes 
risultando comunque utilizzabile. 
La cosa più semplice da fare, ci 
sembra, sia il « nascondere » la 
parola di accesso nel programma 
in modo da far perdere tempo 
all'»eventuale pirata» nella ricerca 
della stessa. Ecco di seguito come 
poter procedere. 

Prima di tutto evitare di inserire la 
parola d'accesso in una linea di 
programma del tipo 
100IF A$ = « TOMMASO » 

THEN . 

bensì come una serie di caratteri 
numerici che il computer controlli 
elemento per elemento, 
comparando i numeri con i codici 
ASCII della stringa inserita. Non è 
necessario che questi caratteri 
siano inseriti nello stesso ordine 
della parola d’accesso né che si 
trovino raggruppati. 

Aumentando la difficoltà di ricerca 
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della parola d'ordine aumenterà 
anche la «sicurezza». 


GRAFICA C.M. 


Possiedo uno Spectrum 48K ed 
ho da poco iniziato ad 
interessarmi, grazie anche alla 
vostra rubrica sullo Z80, alla 
programmazione in Codice 
Macchina. A tale proposito ho 
acquistato alcuni libri dedicati 
all'argomento ma ho notato che molto 
poco spazio è riservato alla trattazione 
di grafica e «sprites». Potreste 
indicarmi il titolo di qualche libro 
espressamente per la grafica? 

Marco Odoacre 
Roma 

Che ci risulti non sono ancora stati 
pubblicati libri per lo Zx-Spectrum 
dedicati esclusivamente alla 
grafica. 

Ad ogni modo, nel caso a Marco 
fosse sfuggito, gli consigliamo di 
acquistare il libro di David Webb 
«Potenziate il vostro Spectrum» 
edito dalla JCE, presentato ne «La 
Libreria di LIST» del numero di 
Agosto/Settembre. 


UNA STAMPANTE PER IL QL 

Sono il possessore di uno 
Spectrum e nonostante sia 
soddisfatto del mio computer 
avrei intenzione di acquistare, 
sempre a breve scadenza, un 
Sinclair QL completo di stampante. 
Quest’ultima dovrebbe essere in grado 
di fornirmi una stampa di buona qualità 
in quanto mi servirebbe per redigere 
delle relazioni universitarie. Allo 




stesso tempo però vorrei, nel caso mi 
servisse, che la stampante fosse in 
grado di riprodurre anche della grafica 
definita dall'utente... 

Federico De Pellegrin 
Belluno 

Nonostante il QL non rientri, 
almeno per il momento, nella 
«rosa» dei computers trattati dalla 
rivista, abbiamo chiesto ai nostri 
tecnici hardware di darsi da fare al 
fine di soddisfare la richiesta del 
lettore di Belluno, che cogliamo 
l'occasione di ringraziare per la 
fiducia riposta nei nostri giudizi. 
Presa come campione la 
stampante EPSON FX 80 della 
redazione sono state effettuate 
varie prove di stampa senza avere 
alcun problema di riproduzione. 
Facciamo notare al nostro amico 
Federico che la grafica sul QL non 
ha grande importanza come sullo 
Zx-Spectrum: ad esempio non 
esistono routines BASIC 
pre-definite per la grafica propria 
dell'utente (la cosiddetta U.D.G.). 
Per questa è necessaria una 
routine in Codice Macchina. 

Non sono inoltre previste istruzioni 
quali COPY che permettono la 
riproduzione su carta dello 
schermo: anche in questo caso è 
necessario ricorrere a preposte 
routines. 

Per ottenere la stampa di testi è 
stato «aperto» un canale verso la 
stampante — nella fattispecie # 3 
— quindi fatta richiesta del 
materiale desiderato anteponendo 


a questo il numero del canale, es. 
PRINT # 3, “LIST" 

Se effettivamente il nostro amico 
Federico è interessato 
principalmente alla stampa di testi, 
una qualsiasi stampante sul tipo di 
quella da noi utilizzata per questa 
prova andrà benissimo. 
Suggeriamo comunque, per una 
maggiore nitidezza dei caratteri di 
stampa, di acquistare una 
stampante a «margherita» che 
permetta il controllo della 
larghezza dell'output. 


TROPPO COMPLESSO? 


Un mio amico mi ha fatto il listato 
di un programma per il CBM 64 
che comprende diverse routines 
in Codice Macchina. 

Quando il programma arriva ad 
una determinata linea — sempre la 
stessa — che contiene l’istruzione 
«SYS 38600», si blocca e viene 
visualizzato il messaggio «FORMULA 
TOO COMPLEX». Anche la tastiera 
rimane bloccata senza darmi la 
possibilità di tentare qualcosa per 
rimediare. 

Che cosa c'è che non va? Ho 
ricontrollato più volte il listato e sono 
sicura di averlo digitato 
correttamente... 

Fiorella Piccione 
Roma 

La SYS indicata, senz'altro 
richiama una delle routines in 
Codice Macchina alle quali la 
nostra lettrice accenna nella sua 
lettera, poiché il messaggio 
rimanda sempre alla stessa parte 
di programma. 



ANNUNCI ANNUNCI ANNUNCI 

A partire da questo numero potrete gratuitamente far pubblicare sulle pagine 
di «LIST» i Vostri piccoli annunci economici per la vendita o lo scambio fra 
privati di materiale usato o in esemplare unico. 

inviate, pertanto, i vostri annunci indirizzandoli a LIST. Piccoli Annunci - Via F. 
Stilicone 111 -00175 Roma, evitando però di indicare ri chieste od indicazioni 
di somme, e specificando chiaramente l'indirizzo o il numero di telefono pres¬ 
so il quale potrete essere contattati. 


□ ECCEZIONALE! Finalmen¬ 
te il lo sintetizzatore vocale 
per il tuo SC-3000. il pro¬ 
gramma non necessita di al¬ 
cuna interfaccia: bastano il 
computer, un televisore ed il 
registratore. Come dimo¬ 
strativi disponibili un diver¬ 
tente «Poker parlante» ed un 
«Merge». Scrivere o telefo¬ 
nare a: 


Ferrari Carlo 

39100 Bolzano 

Via S.A. Merici 90 

Tel. 0471/930838 

00162 ROMA 

□ ECCEZIONALI giochi ed 

Tel. 06/8316783 

Utilities per Commodore 64. 
Richiedete l'elenco: centi¬ 

□ OFFRO programmi per 

naia di programmi - TUTTO 

Commodore 64 in cambio di 

PER TUTTI. 

programmi per standard 

Corsale Giuseppe 

MSX. 

P.zza Mandorle 39 

Frizzerà Franco 

90147 Palermo 

Via Bivio 64 (Dist. 64) 

Tel. 091/532002 


ATTENZIONE: 

La redazione e l'Editore si riservano il diritto di cestinare, senza inviare avvi¬ 
so alcuno agli autori, gli annunci che. a loro insindacabile giudizio, verranno 
ritenuti di carattere speculativo-commerciale, in particolare saranno respinte 
tutte le comunicazioni aventi ad oggetto la vendita di copie contraffatte di sof 
tware di produzione commerciale 

La redazione e l'Editore non assumono alcuna responsabilità nei confronti de¬ 
gli inserzionisti per eventuali errori nella riproduzione del testo degli annunci 
e per eventuali omissioni di parte degli stessi ritenute necessarie. 


FI GRUPPOdiamicivorrebbe 
formare un Club per utenti 
TI99/4A e ZX-Spectrum. Il 
Club si dovrebbe chiamare: 
«CLUB TIZX 99». 

Per informazioni scrivere a: 

Bombelli Christian 

Via Lecco 5 

22043 Galbiate - CO 

Mainetti Luca 

Via Carribbio 7 

22043 Galbiate-CO 
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BASF FlexyDisk 

Affidabilità e raffinata tecnologia 



Con i FlexyDisk® BASF programmi sicuri senza barriere 


Esperti dei più svariati 
campi d'attività scelgono 
i FlexyDisk® BASF perchè 
devono avere l'assoluta certezza 
della disponibilità dei risultati 
del loro lavoro al 100% 
ed in qualsiasi momento. 

La sicurezza totale e 
la quasi illimitata durata d’impiego 
dei FlexyDisk® BASF sono 
il risultato della competenza 
tecnologico-scientifico della BASF: 
un'azienda leader in campo 
internazionale nei settori 
della chimica e della fisica. 

Il FlexyDisk® BASF ha conquistato 
una posizione di spicco grazie a: 

■ l’impiego di materiali ottenuti 
con più recenti tecnologie 

■ lo sviluppo di avanzate tecniche 
di produzione 

■ i metodi scientifici in base 
ai quali durante il processo 
di produzione si effettuano 
continui controlli e prove 

■ la scrupolosità con la quale ogni 
singolo FlexyDisk® viene 
nuovamente testato prima di 
lasciare lo stabilimento. 

Il rendimento dei futuri micro¬ 
computer si moltiplicherà. 

Per questo la ricerca BASF 
è impegnata nello studio di nuove 
tecnologie di memorizzazione 
con densità di registrazione 
fino a 20 volte superiore: 





BASF FlexyDisk 
5.25 ; 5.25 HD, 8 

Assoluta affidabilità e sicurezza 
di funzionamento con durata 
di impiego adesso raddoppiata: 
in media 35 milioni di passaggi 
della testina su una traccia. 


BASF FlexyDisk Science 
5.25; 5.25 HD 

Alta fedeltà per far fronte 
alle condizioni di impiego più 
sfavorevoli. 

Resistenza a temperature fino 
a 70°C, superfici testate al 100%. 
Durata di impiego: in media 
70 milioni di passaggi della testina 
su una traccia. 


BASF FlexyDisk 
3.5 

Il FlexyDisk® con 
una densità di superficie 
estremamente elevata, 
per la nuova generazione 
dei micro-drives. 


■ strati sottili di pigmento 

■ sottilissimi fogli metallici 

■ supporti magneto-ottici a doppia 
faccia. 


"BASF 

L _ 20147 milano 

= r E—C viale legioni romane, 5 
7 - ~ telefono 02-40303 

DATA BASE telex 315206 DATBAS 
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PRONOUNCE 
Riconoscitore 
di voce 


Realizzato dalla Microphonics 
Technology, è installabile in me¬ 
no di quindici minuti sul PC IBM 
o sui compatibili. 

Acquisisce 256 istruzioni (parole 
o brevi frasi), le memorizza ed è 
pronto a rispondere ai comandi 
vocali con conversione degli stessi 
in comandi per il calcolatore. Na¬ 
turalmente più il numero delle 
istruzioni è alto e maggiore sara 
la difficoltà per l'operatore a ri¬ 
cordarli c per il «riconoscitore» 
ad interpretarli correttamente. 

Il PRONOUNCE può essere im¬ 
piegato in normali lavori indivi¬ 
duali cd in tutte le applicazioni 
dove si voglia evitare l'uso della 
tastiera e snellire le operazioni re¬ 
lative alla esecuzione di program¬ 
mi molto complessi. 


Per informazioni: 

CARLA BORGHI TEL- 
COM SRL VIA CIVITA- 
L1 75-MILANO 


Quick 
data Drive 


PIEDE MARINO 


Trenta secondi per caricare un 
qualsiasi programma su CBM 64 
o VIC 20: questo il tempo neces¬ 
sario, a detta della casa costrut¬ 
trice la DEAN ELECTRONICS, 
al nuovo drive Quick Data, colle¬ 
gabile ai due computcrs mediante 
la porta per il registratore. 


MICRO 
DA POLSO 

La SEIKO, nota casa giappone¬ 
se. ha da poco introdotto sul mer¬ 
cato il primo orologiocomputcr 
da polso: l'RC-1000. In realtà si 
tratta di un terminale che colle¬ 
gato ad un normale CBM 64 può 
ricevere ben 2K di dati, consulta- 
bili dal display a cristalli liquidi 
dell'orologio (pari a due linee di 
24 caratteri ciascuna). 

Sempre tramite il '64 è inoltre 
possibile memorizzare messaggi 
come date di compleanni, an¬ 
niversari. appuntamenti visualiz¬ 
zabili nell'arco di un anno. 


Il personal computer NCR che ha partecipato alla 
Brooklyn Cup 

ha assolto brillantemente il suo compito 


Gli appassionati della vela, ma 
anche il grande pubblico, hanno 
potuto gustarsi la regata transa¬ 
tlantica Portofino-New York, 
non solo per la quantità di colpi 
di scena che ne hanno accompa¬ 
gnato l'avvio ma anche per la di¬ 
sponibilità quotidiana della clas¬ 
sifica in tempo compensato. 

Un dato questo non facile (prece¬ 
denti tentativi in competizioni 
transoceaniche erano letteral¬ 
mente «naufragate» dopo pochi 
giorni di navigazione a causa del¬ 
la difficoltà di confronto fra rotte 
diverse e diversi «rating» delle im¬ 
barcazioni) che la Brooklyn Cup 
ha avuto il merito di fornire per la 
prima volta nella storia delle 
competizioni veliche durante lo 
svolgimento della regata, grazie 
ad un programma appositamen¬ 
te studiato dalla NCR Compu- 
ters cd a un personal che ha af¬ 
frontato l'oceano a bordo della 
barca appoggio (il Rolly Go di 
Giorgio Falck). Il PC NCR ha 
elaborato le coordinale trasmesse 



Giorgio Falck mentre elabora le clas¬ 
sifiche a bordo del Rolly Go. 


dai concorrenti, fornendo agli 
stessi ed alla stampa una classifi¬ 
ca affidabile c precisa. Per il per¬ 
sonal NCR. che si è trovato ad 
affrontare condizioni metereolo- 
giche tutt'altro che tranquille, si c 
trattato di una vera e propria 
«prova sull'acqua», che ne ha 
messo in risalto un insospctlato 
«piede marino». 

Per altre informazioni: 

DR. LUIGI NORSA. 
RELAZIONI ESTERNE. 
NCR ITALIA, V.LE 
CASSALA 22-20143 MI¬ 
LANO-TEL. 02/83.874.1 


L’UFFICIO ...A PORTATA DI VOCE! 


Un nuovo telefono intercomuni¬ 
cante. interamente elettronico, 
per uffici, banche, studi profes¬ 
sionali e piccole aziende è stato 
presentato dalla ITALTEL Tele¬ 
matica. L'intercomunicante, de¬ 
nominato «Office KS 2.5». ha 
una capacità di due linee esterne 
c di cinque interne. 

L'Office KS 2.5 offre une nuova 
gamma di possibilità applicative, 
quali: 

conferenza a tre utenti sulle 
linee interne oppure tra un 
utente esterno e due interni: 
ripetizione dell'ultimo nume¬ 
ro esterno chiamato, se trova¬ 
to occupalo; 

segnalazione di sollecito per 
la prenotazione di una linea 
esterna in attesa; 


segnalazione luminosa, sul ta¬ 
sto corrispondente, di un in¬ 
terno chiamante; 
suoneria elettronica a volu¬ 
me regolabile. 



L’Office KS 2.5. le cui funzioni 
sono controllate da un micropro¬ 
cessore, dispone di due linee 
esterne collegabili alle reti pubbli¬ 
che o a centrali private; due cir¬ 
cuiti di intercomunicazione con la 
possibilità di due conversazioni 
interne contemporanee; cinque 
apparecchi telefonici, dolati di 
microfono e ricevitore piezocera- 
mici. che assicurano una trasmis¬ 
sione e una ricezione della voce 
senza distorsioni. 

Per informazioni: 

GIUSEPPE ESPOSITO 
ITALTEL - RELAZ. 
ESTERNE VIA A. DI 
TOCQUEVILLE 13 MI¬ 
LANO 


Nuova 

Società 

Sinclair 

Sir dive Sinclair, fondatore c 
presidente della Sinclair Research 
e della Sinclair Vehicles. ha an¬ 
nunciato la prossima apertura di 
una nuova Società che curerà la 
produzione di semiconduttori ba¬ 
sali sulla rivoluzionaria tecnolo¬ 
gia WAFER SCALE INTE¬ 
GRATION (WSI). 

Si tratta in pratica di circuiti che 
consentiranno di disporre di una 
memoria di massa di notevoli ca¬ 
pacità da 0.5 mg. in su ad 
una velocità di accesso 50 volte 
superiore a quella degli Hard Di- 
sks. con un costo decisamente in¬ 
feriore. 
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☆ QL MONITOR 
14” A COLORI RGB 

Il suo design particolarmente cu¬ 
rato, il colore nero, lo schermo 
antiriflesso fanno di questo mo¬ 
nitor l'ideale complemento del 
QL. 

Caratteristiche: 

85 colonne 
banda video 12 Mhz 
dimensioni = 375 I x 375 h x 
390 



☆ SEIKOSHA 
SP800IQL 

Nuova stampante ad impatto, 
con matrice di stampa 9x9. 

80 colonne. 80 caratteri al secon¬ 
do, bidirezionale et ottimizzata, 
Near Letter Quality. 

Con trattori e frizione, elabora il 
modulo continuo ed il foglio sin¬ 
golo. 

Viene fornita completa di Inter¬ 
faccia e cavo di collegamento per 
QL. 



☆ UNITÀ 
DI MASSA 

Sistema di Microlloppy 3.5" per 
QL da 1.44 M B formattati. 
Disponibile in due versioni: 
MICRO FLOPPY DRIVE I 
da 3.50" 

Capacità = 720 Kbytc for¬ 
mattati 

Rapporto trasferimento dati 
= 250 Kbit SCC. 

Comprende l‘I/F di controllo 
(può supportare fino a 4 Dri¬ 
ve) e l'alimentatore. 

MICRO FLOPPY DRIVE 2 
da 3.50" 


NOVITÀ SINCLAIR 



Capacità = 720 K bytefor¬ 
mattati 

Unità aggiuntiva 

☆ ESPANSIONI 
RAM 

Per ottenere il massimo delle pre¬ 
stazioni da un potente micropro¬ 
cessore sono necessari program¬ 
mi polenti che, spesso, operano 
con grandi quantità di dati. Na¬ 
turalmente è necessaria anche 
una elevata quantità di memoria 
RAM. 

Il Sinclair QL grazie ai suoi I28K 
riesce a gestire brillantemente tali 
programmi: tuttavia sono dispo¬ 
nibili per esigenze particolari 
schede di espansione che si inseri¬ 
scono nell'apposito SLOT latera¬ 
le e che forniscono un totale di 
640K RAM. 

Le schede sono disponibili nelle 
seguenti versioni, al fine di essere 
adattabili alle più diverse esigen¬ 
ze: 

espansione da 64K RAM 
espansione da I28K RAM 
espansione da 256K RAM 
espansione da 512K RAM 



☆ SOFTWARE 

Finalmente disponibili alcuni dei 
programmi della COMPUTER 
ONE fra i più attesi dagli utenti 
QL. 

Si tratta di quattro prestigiosi 
pacchetti: ASSEMBLER, MO¬ 
NITOR. FORTH. PASCAL. 
ASSEMBLER. Qon questo 
programma sarà finalmente 
possibile utilizzare tutta la po¬ 
tenza del processore 68008 del 
QL. 


Il pacchetto c stato realizza¬ 
to per scrivere qualsiasi ap¬ 
plicazione in Linguaggio 
Macchina inclusi giochi, ani¬ 
mazione c software «rcal-ti- 
mc». 

MONITOR (Disasscmbler). 
Potentissimo disassemblatore 
«multitasking» e «multiwin- 
dow». 

Programma utile per qual¬ 
siasi sviluppo di software per 
il QL, da utilizzare in unione 
con il già citato «Assem¬ 
bler». 

FORTH. Linguaggio della 
nuova generazione, partico¬ 
larmente facile da apprende¬ 
re. Il pacchetto offre una 
completa implementazione 
del FORTH 83 standard, con 
estensione di suono c grafica. 



— PASCAL. Probabilmente il 
più popolare linguaggio ad al¬ 
to livello. Il pacchetto dispo¬ 
nibile permette di scrivere 
programmi strutturati in ma¬ 
niera professionale ed aiuta a 
risolvere manipolazioni di da¬ 
ti e algoritmi particolarmente 
complessi. 

Completo di manuale di istru¬ 
zione. 



Ancora tre pacchetti, senz'altro 
molto attesi, editi però dalla 
MCC - MetaComCo: QL ASSEM¬ 
BLER DEV. KIT, QL LISP DEV. 
KIT, QL BCPLDEV. KIT. 

ASSEMBLER DEV. KIT. Il 
programma, per la sua veloci¬ 
tà e compattezza è particolar¬ 
mente indicato per sfruttare le 
caratteristiche del QL. 

Offre la possibilità di scrivere 



programmi c routincs in as¬ 
sembler e richiamarli dal Su¬ 
per Basic o di inserirli all'in¬ 
terno di programmi scritti in 
linguaggi al alto livello. 

LISP DEV. KIT. Il Lisp è uno 
dei linguaggi per computer 
più significativi degli anni '80. 
Viene utilizzato per sviluppa¬ 
re programmi complessi e per 
manipolare strutture di dati. 
Questa versione per il QL è 
ideale per l'apprendimento 
del linguaggio e per la sua 
sperimentazione. 

BCPL DEV. KIT. Particolar¬ 
mente indicato per sviluppare 
Utilities, giochi e pacchetti ap¬ 
plicativi, il BCPL è stato svi¬ 
luppato per l'uso con diversi 
linguaggi e per molti compu¬ 
ter. 

La versione per QL presenta¬ 
ta comprende delle speciali 
routincs che interagiscono 
con il QDOS per la gestione 
delle finislre, della grafica, dei 
files. 

BCPL offre la convenienza 
del linguaggio di livello avan¬ 
zato combinato con la flessi¬ 
bilità dcll’Assembler. 

Il pacchetto comprende oltre, 
al manuale di istruzione an¬ 
che SCREEN EDITOR. 
Ultima novità software presenta¬ 
ta, il pacchetto della GST COM¬ 
PUTER SYSTEMS LTD. - QL 
"C" COMPILER. 

Si tratta della versione per Sin¬ 
clair del noto linguaggio “C”, uti¬ 
lizzato nei sistemi Unix. 

Il pacchetto comprende un com¬ 
pilatore ed il libro «The C Pro- 
gramming Languagc». 
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CONTROLLO 
DELLO 
SPAZIO 
«MADE 
IN ITALY» 


Giovanni Medcot, già responsa¬ 
bile della divisione Telecomuni¬ 
cazioni per la Difesa della 
ITALTF.L. c stato nominato 
presidente della Società A MS 
(Airspace Management System) 
che assiste la NATO nel proget¬ 
to del sistema ACCS per il con¬ 
trollo dello spazio aereo. La 
ITALTEL c l'unico azionista 
italiano della AMS. 

LA AMS sta portando avanti 
tre studi di sistema per PACCS 
(Air Command and Control Sy¬ 
stem); L'obiettivo è disporre ili 
un sistema integrato di coman¬ 
do c controllo dello spazio aereo 
che assicuri con tempestività la 
pianificazione e lo svolgimento 
delle operazioni di dilesa aerea 
per il prossimo decennio. Il pro¬ 
gramma rappresenta l'evoluzio¬ 
ne dell'attuale rete di difesa 
NADGE (Nato Air Defcnce 
Ground Environnient). 


Per informazioni: 

FILIPPO NOSF.NGO 
ITALTEL - RELAZ. 
ESTERNE VIA A. TOC¬ 
QUEVILLE 13 MILANO 


Una Banana... 
per il ’64 

No non si tratta del gustoso frut¬ 
to esotico bensì di una interfac¬ 
cia. in fase di produzione alla 
C'ASTLE ASSOCIATES di Scar- 
borough. in grado di gestire otto 
INPUTs movimento, suono, 
luce e pilotare otto OUTPUTs 
controllo macchine fotografi¬ 
che. giradischi, ccc. 

Perché l'interfaccia è stata chia¬ 
mata Banana? Perché c talmente 
tanto semplice da utilizzare di¬ 
cono alla CASTLE — che anche 
uno scimmiotto riuscirebbe a far¬ 
la funzionare! 


ANALISI STRUTTURALE E 
PERSONAL COMPUTER 

GLI ELEMENTI FINITI COME MEZZO 
POTENTE E VERSA TILE PER IL CALCOLO 
DELLE STR UTTURE PIÙ COMPLESSE ORA 
ANCHE SUI PERSONAL 


Il metodo degli Elementi finiti 
rappresenta sicuramente al gior¬ 
no d'oggi il mezzo più potente 
per eseguire il calcolo di un pro¬ 
getto delle strutture di grossi 
edifici, ponti, pezzi meccanici 
più sollecitati c. addirittura, de¬ 
gli scafi delle barche più veloci. 
Se si considera che tutti i metodi 
di calcolo utilizzati prima della 
sua introduzione richiedevano 
necessariamente drastiche ap¬ 
prossimazioni e schematizzazio¬ 
ni spesso grossolane — delle 
strutture da progettare e non 
esisteva quindi alcuna possibili¬ 
tà di fidarsi in modo concreto 
dei risultati ottenuti, si può fa¬ 
cilmente dedurre l'importanza 
rivestita dal nuovo metodo per 
ingegneri ed architetti. 
Sviluppato circa trenta anni fa 
negli USA per il progetto delle 
strutture aeronautiche della 
BOEING Corporation, il meto¬ 
do viene ora applicato con suc¬ 
cesso anche nel settore civile, 
meccanico, navale grazie anche 
allo sviluppo della nuova gene¬ 
razione di compulers sempre più 
veloci, precisi ed affidabili. 

A tale proposito STUDIO 
STRUTTURA e SAP USF.RS 
GROUP ITALIA, un insieme di 
ingegneri che si dedicano speci¬ 
ficatamente all'applicazione del 
metodo degli Elementi Finiti, 
propongono SAP 80 pro¬ 
gramma per il calcolo struttura¬ 
le su Personal Computer c 
EEM- DUE due corsi com¬ 
pletamente dedicati all'appren¬ 
dimento del metodo in tutti i 
suoi aspetti applicativi. 

SAP 80. Autore del program¬ 
ma. che svolge appunto l'ana¬ 
lisi statica c dinamica delle 
strutture basandosi completa¬ 
mente sul metodo degli ele¬ 
menti finiti, è E.L. Wilson 
dell'Università di Berkeley - 
California. 

Il programma contiene nella 
sua libreria tutti gli clementi 
finiti di più frequente impie¬ 


go. quali ad esempio elementi 
per lastre inflesse c per stati 
di tensione piani. 

SAP 80 comprende tre modu¬ 
li di programma: STATIC 
per il calcolo delle strutture 
con carichi statistici. DYNA- 
MIC per il calcolo delle fre¬ 
quenze e dei modi di vibra¬ 
zione. SA PLOT per la rap¬ 
presentazione grafica del mo¬ 
dello della struttura e della 
sua deformata. 

— FEM DUE. I corsi sul me¬ 
todo degli Elementi finiti, 
realizzati da Studio Struttura 
in collaborazione con docenti 
del Politecnico di Milano e 
dell'Università di Bologna, si 
svolgeranno presso il centro 
Congressi Jolly Hotel di Mi¬ 
lano 2. 

1 temi dei corsi saranno: 

PRIMA SCUOLA SUL ME- 


In linea con la filosofia della MA¬ 
XELL «Affidabilità senza 
compromessi e confortata da 
un programma di intensa ricerca 
tecnologica sempre più avanzala, 
la TELCOM — distributore 
esclusivo per l'Italia dei supporti 
magnetici MAXELL vanta 
oggi la possibilità di soddisfare le 
varie richieste del mercato di 
floppy disks con prodotti sempre 
più affidabili e dalle prestazioni 
elevale. 

Le novità più interessanti sono 
costituite dal microfloppy da 3.5” 
singola c doppia faccia -, dai 
minifioppy da 5.25”, da 0.5 e I 
MB c. ultimi nati, i mini da 1.6 
MB per sistemi avanzali quali sii 
IBM AT. 


TODO DEGLI ELEMENTI 
FINITI - per tutti coloro che af¬ 
frontano questo procedimento 
per la prima volta; 

SAP 80-SAP 86 DUE PRO¬ 
GRAMMI DI ANALISI 
STRUTTURALE ME¬ 
DIANTE ELEMENTI FI¬ 
NITI SU PERSONAL/M I- 
CRO COMPUTER -per chi 
già conosce il metodo e vuole sa¬ 
perne di più per riuscire ad appli¬ 
carlo su Personal Computer. 

Due workshop applicativi com¬ 
pleteranno ogni giornata di stu¬ 
dio. 


Per informa/ioni: 

STUDIO STRUTTURA¬ 
SA UP USERS GROUP 
ITALIA VIA VALLE¬ 
SCURA 8 3 BOLOGNA 



Gamma dei dischetti MAXELL, 
fra i quali MD2 HD per sistemi 
IBM AT 


AUMENTA LA PRESENZA 
MAXELL 


12 


LIST 10/11 







LIST MAGAZINE 


PRODOTTI RHÒNE POULENC 


La Rhónc Poulenc System pre¬ 
senta una nuova gamma di sup¬ 
porti magnetici per l’informatica. 

I nuovi prodotti sono caratteriz¬ 
zati da una accurata scelta dei 
materiali e da una lavorazione 
che si avvale di alte tecnologie. 

La selezione rigorosa dei compo¬ 
nenti garantisce un involucro in 
PVC particolarmente resistente 
alle temperature e perfettamente 
compatibile con tutti i lettori di 
dischetti. L'usura del disco (un 
substrato di poliestere ricoperto 
da una emulsione magnetica ad 
alto potere coercitivo) è notevol¬ 
mente ridotta grazie al materiale 
con cui è foderato l'interno del di¬ 
schetto. 

Oltre che garantire la velocità co¬ 
stante del dischetto, l'intissé assi¬ 
cura anche la perfetta centratura 
in fase di caricamento del DRI¬ 
VE. 

Un particolare trattamento che 
assicura la omogenità di disper¬ 
sione degli ossidi sulla superficie 
del disco ha consentito di miglio¬ 
rare il contatto tra testina e di¬ 
sco. permettendo di allungare i 
tempi di manutenzione delle ap¬ 
parecchiature. e diminuendo il 


grado di usura delle testine dovu¬ 
to all'abrasione di dischetti non 
trattati con il procedimento FLE- 
XETTEdi proprietà R.P.S. 

La serie di dischi flessibili FLE- 
XETTF. è disponibile nei formati 
8” e 5-1/4”. 

In entrambi i casi è possibile sce¬ 
gliere fra una vasta gamma di 
versioni che offrono la possibilità 
di usare dischetti a doppia o sin¬ 
gola faccia e diverse capacità di 
registrazione per settore c faccia 
fino a un massimo di 1.6 Mbytcs 
nella versione da 8” e 1 Mbyte 
per la versione da 5-1 /4". 

La Rhóne Poulenc Systemcs di¬ 
stribuisce inoltre i prodotti della 
Brown Disc, americana caratte¬ 
rizzati dall'uso di particolari ossi¬ 
di magnetici per il trattamento 
delle superfici del disco. 

Il fiore all'occhiello della serie di 
nuovi prodotti è il microfloppy 
da 3.5'' costruito direttamente 
dalla Rhóne Poulenc Systcmes 
nei laboratori di ALBI. 

Tale formato si avvia probabil¬ 
mente a divenire uno standard di 
fatto, specialmente se si tiene con¬ 
to che già oggi numerosi costrut¬ 
tori di personal computers come 


APPLE (Mclntosh) c HEWLET¬ 
T-PACKARD (IIP 150) già lo 
usano normalmente per i loro 
prodotti. 

Oltre agli enormi vantaggi deri¬ 
vanti dalle ridotte dimensioni 
(9x9.4x0.33 cm), il nuovo micro¬ 
floppy si caratterizza per la con¬ 
fezione in plastica rigida dotata 
di una «finestra» ad apertura c 
chiusura automatica (auto-shut- 
ter) e di un mozzo metallico di 
centratura che assicura il perfetto 
posizionamento all’interno del 
drive. 

Il disco utilizzato si compone di 
un supporto di poliestere del dia¬ 
metro di 85.8 mm e dello spesso¬ 
re di 75 micron di cui 1.8 micron 
composti dallo strato di ossido di 
ferro al cobalto che assicura una 
cocrcitività di 630 Ocrsteds. 

Il nuovo microfloppy assicura 
una capacità di 80 piste per faccia 
ed una capacità di un Mbyte per 
floppy non formattato per la ver¬ 
sione a doppia faccia. 

Altra caratteristica del microflop¬ 
py c il particolare sistema di pro¬ 
tezione delle informazioni regi¬ 
strate che si avvale di un nottoli¬ 
no scorrevole. 
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Per altre informazioni: 

RHÒNE POULENC 
ITALIA VIA G.C. WIN- 
CKELMANN 2 20146 
MILANO TEL. 02/42461 


QL SOFTWARE 


È siala recentemente rilasciata 
una seconda versione, la 2.0 del 
software PSION — Ahacus, 
Quill, Easel. Archi ve — dedicato 
a! QL. in grado di soddisfare esi¬ 
genze professionali molto sofisti¬ 
cale. 

Rispetto alla versione precedente 
la nuova offre notevoli vantaggi: 
ad esempio i tempi di caricamento 
dei programmi sono stati dimezza¬ 
ti di circa il 50 per cento e la me¬ 
moria disponibile aumentata di di¬ 
versi Kbyte. 

La versione 2.0, inoltre, dispone di 
un programma l'INS TA L L 

BAS che consente di installare 
la propria stampante scegliendo 
l'opportuno Printer Drive in una 
lista di otto. È comunque mollo fa¬ 
cile crearne di altri se la propria 
stampante non è compresa tra 
quelle elencate. La stessa nuova 
versione presenta poi un altro pro¬ 
gramma — il CONFIF BAS 
che permette di configurare il pro¬ 
prio sistema sia in termini di Har¬ 
dware che di Software. 

Annunciata la disponibilità in ver¬ 
sione italiana di quattro pacchetti 
per il Sinclair QL rivolti ad una 
utenza professionale. 

Le applicazioni interessate sono: 


QL Cash Trader: sistema di 
contabilità che permette a chiun¬ 
que voglia gestire flussi di cassa, di 
mantenere il bilancio delle entrate 
e delle uscite e di ottenere ogni 
giorno in modo estremamente 
semplice — un report sulla situa¬ 
zione IV R. 

QL Project Planner: program¬ 
ma che consente di costituire grafi¬ 
camente sul monitor il diagramma 
di un progetto secondo la tecnica 
Pert. 

QL Decision Maker: program¬ 
ma che aiuta l'utente a decidere 
quale sia la scelta ottimale in un 
insieme di possibili azioni in cui so¬ 
no coinvolte probabilità e somme 
di denaro, simulando l'effetto di 
ogni decisione ed associando ad 
ognuna di esse un certo valore di 
rischio. 

QL Entrepreneur: divertente 
applicazione, utile per chi voglia 
intraprendere una nuova attività 
commerciale. Il programma aiuta 
l'utente a decidere di quali infor¬ 
mazioni abbia bisogno per comin¬ 
ciare la nuova attività e ne simula 
il flusso di cassa per 18 mesi suc¬ 
cessivi, producendo un bilancio di 
entrate, uscite, IVR. 

La traduzione in corso non riguar¬ 


da soli i manuali: gli stessi pro¬ 
grammi saranno adattati ad una 
realtà chiaramente differente. 

La SINCLAIR sta investendo nel¬ 
lo sviluppo di Software per I QL 
realizzato in Italia, parte del quale 
verrà anche esportato all'Estero. 

I programmi già commissionati a 
due Software houses una di Ro¬ 
ma ed una di Milano sono una 
applicazione per i medici, un pro¬ 



gramma di Forecast ed uno di 
Contabilità e Magazzino. 

Risulta chiara la volontà della Sin¬ 
clair di indirizzare il QL verso un 
mercato professionale, sfruttando 
il vantaggio del costo estremamen¬ 
te contenuto. 

I TOOL di programmazione tar¬ 
gali QL, sono stati recentemente 
arricchiti dal QL Monitor e da! 
QL too/kit. Il primo comprende un 
Disassembler e permette di esami¬ 
nare a fondo tutte le caratteristi¬ 
che del computer e del Super BA¬ 
SIC: il secondo è un insieme di 
programmi ed estensioni al Super- 
BA SIC. 

Fanno parte del QL Toolkit uno 
Screen-Editor, una utility di Spoo- 
ling ed una per gestire l'accesso 
randomico ai Files su Microdrive. 
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I MOSTRA NAZIONALE MSX 


Si è svolta a Vicenza dal IO al 13 
ottobre la I Mostra Nazionale 
MSX che rimarrà agli atti come 
la prima mostra in Italia dedicata 
ai prodotti del nuovo standard. 
Nato nei fervidi laboratori sof¬ 
tware della MICROSOFT, lo 
standard MSX ha avuto una pri¬ 
ma immediata applicazione in 
Giapppone dove ancora oggi, no¬ 
nostante una lieve flessione, le 
Case dedicate a questa produzio¬ 
ne sono più di venti. 

In Italia alle molte marche giap¬ 
ponesi rappresentate SONY. 
TOSHIBA ccc. si uniscono la 
olandese PHILIPS e la statuni¬ 


tense SPF.CTRAVIDFO che si 
allineano, con i propri prodotti, 
alle specifiche dello standard MI¬ 
CROSOFT. 

Molle riviste specializzale si sono 
soffermate sui prodotti dello 
standard a riprova deirinteressc 
gravitante intorno a questa real¬ 
tà. 

Il mensile F.G COMPUTER. ad 
esempio, edito dalla JCE. dedica 
all'MSX una rubrica fissa che ol¬ 
tre a notizie, listati e recensioni 
software hardware, accoglie il 
CLUB MSX ITALIA che riuni¬ 
sce più di mille utenti. 

Ed è proprio EG ad organizzare 



la mostra in collaborazione con 
l’Ente Fiera di Vicenza. 

Le marche presenti sono state 
le più autorevoli del panorama 


internazionale: tra quelle presenti 
sul mercato italiano l'unica man¬ 
cante c stata la Y ASM ICA. nota 
soprattutto per i prodotti foto¬ 
grafici. Presenti altri colossi, lilia¬ 
li SONY. SPF.CTRA VIDEO. 
PHILIPSc YAMAHA. 
L'esposizione a dato spazio an¬ 
che ai distributori di periferiche c 
di software. Per l’Ente Fiera di 
Vicenza la mostra ha rappresen¬ 
tato la prima occasione per entra¬ 
re in contatto con il mondo degli 
Home-Computers; per F.G una 
occasione senz’altro prestigiosa 
per porsi all’attenzione degli inte¬ 
ressati allo standard. 


IL PUNTO SULL’MSX 

Dopo un certo successo dello standard MSX, V 
produttori del Sol Levante e non solo, tornano 
all'attacco con i nuovi prodotti dello standard MSX 
II; una ulteriore evoluzione e miglioramento delle 
doti e delle qualità già risapute per il «vecchio» 
MSX, di cui, comunque, non cessa la produzione di 
nuovi modelli. Vediamo da vicino alcuni nuovi 
prodotti che presto arriveranno, o sono già distribuiti, 
nel nostro bene amato «stivale». 



• PHILIPS 

Cominciamo da una marca che di 
orientale ha ben poco, se non la 
consuetudine a stringere rapporti 
commerciali con le maggiori ditte 
di elettronica di consumo del 
Giappone. 

Dovrebbe quanto prima immet¬ 
tere sul mercato il prodotto visi¬ 
bile nelle foto: un computer MSX 
della II generazione interfacciabi- 
lecon VIDEOLASER. le cui pos¬ 


sibilità grafiche dovrebbero esse¬ 
re «portentose». 

A quando «l’avvenimento»?... 

• CANON 

Dopo il successo del modello 
V20, sono sempre più insistenti le 
notizie riguardanti l'entrata in 
produzione in Giappone di un 
modello della seconda generazio¬ 
ne di MSX che probabilmente 
dovremmo vedere in Italia nella 
prossima primavera. 

• SANYO 

Data per certa l’esistenza in 
Francia di un modello denomina¬ 
to PHC 28 dotalo di un buon as¬ 
sortimento di periferiche, tra cui 
un data record dedicato ed un va¬ 
sto assortimento di cartucce di 
espansione. Attualmente qui in 
Italia viene distribuito solo il mo¬ 
dello M PC 100 da 64K. 

• SONY 

È sicuramente la marca con il 
maggior numero di sorprese per 
questa fine del 1985 c inizio del 
1986. 

Dovrebbero presto esser distri¬ 
buiti i nuovi modelli 50IP ed il 
500FP: il primo è dotato di regi¬ 
stratore dedicato incorporato. 


memoria di 64K RAM, 16 di vi¬ 
deo e 32K ROM contenenti il 
BASIC MSX; il magnifico 500FP 
possiede caratteristiche degne di 
nota, è costruito secondo lo stan¬ 
dard MSX 11. ma è perfettamente 
compatibile con il software MSX 
fin ora prodotto, la tastiera è se¬ 
parata dal mobile contenente an¬ 
che un floppy da 700K formatta¬ 
ti. 



Altre caratteristiche di rilievo do¬ 
vrebbero essere la memoria sud¬ 
divisa in 64K RAM, 64K video. 
48K ROM per il BASIC MSX c 
16K ROM per la gestione del dri¬ 
ve capace di operare con dischetti 
da 5.25 pollici a doppia faccia; 
l’uscita video olire la possibilità 
di usare 80 o 40 colonne per 24 li¬ 
nee di testo, oppure in modo gra¬ 


fico. varie possibilità da un mini¬ 
mo di 64 * 48 pixels (512 colori) 
ad un massimo di due pagine gra¬ 
fiche indirizzabili per dots con 
una risoluzione di 512 * 212 pi¬ 
xels (4-512 colori). 

La tastiera separata, munita di 
pad numerico, unita alle caratte¬ 
ristiche di qualità elevata, lascia 
supporre un uso professionale del 
modello. 

1 prezzi per il momento sono an¬ 
cora TOP SECRET!!! 

• TOSHIBA 

Anche in questo caso non manca¬ 
no le novità: 

c già distribuito il modello liX 22 
con caratteristiche di tutto rilievo 
quali WORD-PRO incorporato, 
uscita video RGB a norme 
SCART. interfaccia seriale RS 
232C incorporata. 32K ROM 
BASIC MSX c 32K ROM BA¬ 
SIC MSX Extcndcd. 64K RAM e 
I6K. Video ed inoltre una vasta 
gamma di periferiche tra cui una 
tastiera musicale, sempre di pro¬ 
duzione Toshiba, la cui qualità 
sonora non dovrebbe essere indif¬ 
ferente. 

Non manca la novità riguardante 
lo standard MSX II della quale 
attualmente non si conoscono le 
caratteristiche, ma nell'ultimo 
SIM è stato visto il nuovo model¬ 
lo collegato ed un monitor che ne 
illustrava le enormi capacità gra¬ 
fiche (abbiamo visto la fotografia 
di una geisha scomporsi in una 
miriade di frammenti colorati 
per poi ricomporsi in una diversa 
immagine). 

Ancora la Toshiba ci riserva una 
ulteriore novità: si tratta di 
MURPHY. un robot interfaccia- 
to con lo standard MSX, pro¬ 
grammabile via radio e dotato di 
sensori per evitare gli ostacoli. Di 
questo, come dnegli altri prodotti 
non si conosce il prezzo. 
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# Il software MSX 

Comincia ad essere distribuito in 
misura eguale a quella delle altre 
marche. Spiccano i prodotti ela¬ 
borati da SONY. RUMA. AC- 
TIVISION (quella di Ghostbu- 
sters), KJONAMI. HUDSON 
SOFT e dall'inglese MASTF.R- 
TRONIC ora distribuita anche in 
Italia. 

Tra i programmi più interessanti 


Pivot è un personal computer che 
olire caratteristiche riscontrabili 
solo in PC fissi da tavolo, ad un 
prezzo sicuramente più conve¬ 
niente. Si tratta di un computer 
portatile che permette l'accesso 
alla vasta libreria di software di 
produzione IBM. 

Il livello di compatibilità è note¬ 
volmente elevato, infatti è possi¬ 
bile far girare gli stessi program¬ 
mi del PC IBM sugli identici flop¬ 
py disk drive collegati al Pivot 2. 
L'alto livello di compatibilità è 
ulteriormente confermato anche 
dalla possibilità di poter collegare 
le stampanti parallele IBM. c il 
poter usare anche le schede del 



è possibile reperire con maggiore 
facilità «pacchetti» grafici e musi¬ 
cali. una serie di prodotti rivolti 
alla scuola elementare, titoli illu¬ 
stri come Zaxxon. Buck Rogers e 
Congo-Bongo in versione MSX, 
tutta une serie di compilatori LO¬ 
GO ed un magnifico simulatore 
di volo del Boeing 737 sempre in 
versione standard. 

Segnaliamo i prodotti della Ma- 
slertronic, come Finders Keepers, 
C'hiller. Space Walk ed altri titoli, 
per la buona qualità grafica e so¬ 
nora, e per i prezzi veramente 
contenuti se rapportati alle carat¬ 
teristiche generali dei suoi veloci 
giochi d'azione. 

Sicuramente se le tendenze di 
mercato in atto si consolideran¬ 
no, nei prossimi mesi sentiremo 
parlare spesso di MSX: si può af¬ 
fermare con sicurezza che una 
grande fetta del business dell'elet¬ 
tronica di consumo, c quindi dcl- 
l'home computer, si sta orientan¬ 
do sempre di più verso la com¬ 
mercializzazione e diffusione dei 
prodotti MSX. 

Per voi lettori. LIST continuerà a 
rappresentare una utile guida nei 
meandri di questo settore, che an¬ 
nuncia grandi battaglie a colpi di 
nuovi modelli e caratteristiche 
sempre migliori. 


PC IBM collegato al bus di 
espansione del Pivot. 

A questa qualità non del tutto in- 
dillcrcnte. si affianca anche la ca¬ 
ratteristica di grande leggibilità del 
display da 80 colonne * 25 linee 
(640 * 200 pixels). costruito con il 
metodo esclusivo «LUMICOM», 
una tecnologia di costruzione che 
combina i pregi del display a cri¬ 
stalli liquidi con quelli elettrolumi¬ 
nescenti in modo da ottenere uno 
schermo non riflettente leggibile in 
qualsiasi condizione di luce. 

Il Pivot 2 in configurazione stan¬ 
dard è dotato di microprocessore 
IBM compatibile a basso consu¬ 
mo del tipo CMOS 80C88 16 bit 


con clock a 4.77 MHz, la memo¬ 
ria comprende una RAM da 
256K a 640K. 32K ROM e 4K di 
RAM non volatile per files dati 
come telefono c lista di appunta¬ 
menti. È compatibile con IBM 
PC e PC DOS 2:1 c viene fornito 
con il sistema operativo MS DOS 
2.11. il WORD-PRO «New- 
WORD» ed il GSS VDI DRI- 
VF.R che gestisce indipendente¬ 
mente dall'hardware, in uscita 
standard, approvata dall’IBM. 
varie utilizzazioni grafiche ad es¬ 
so interfacciabili. 

Il Pivot c equipaggiato con 4 por¬ 
le standard: 

una porta parallela per stampan¬ 
te. una porla seriale RS232C' da 
110 a 9600 bauds, una porta 
RJ1IC per un eventuale modem 
telefonico (compatibile Haycs 
Smart Modem) in opzione ed una 
porta di espansione per il collega¬ 
mento a periferiche, schede grafi¬ 
che, hard disk, espansioni, ecc. 
Tra le periferiche disponibili c 
possibile collegare uno o due 
floppy da 5,25 pollici, ognuno 
con 360 KBytes di capacità: nel 
caso del doppio drive viene forni¬ 
ta anche una scheda grafica con 
uscita per video composito e 
RGB; c possibile installare inter¬ 
namente un modem completo di 
software di gestione che permette 
di selezionare la velocità di tra¬ 
smissione tra 300 e 1200 bauds. 
Per ulteriori informazioni ci si 
può rivolgere a: 

C K EURODIS COMPONENTS - 
VIA FRAPOLLI 21 - 20133 MILA¬ 
NO - TEL. (02) 719371-7386165. 


SOFTWARE 
per il 

COMMODORE 128 

Dopo la iniziata distribuzione del 
CI28 da parte della Commdore, 
cominciano ad arrivare anche le 
prime indicazioni riguardanti il 
software adatto a questo compu¬ 
ter. 

Vi proponiamo un pacchetto ge¬ 
stionale che raggruppa in un uni¬ 
co blocco word processing, foglio 
elettronico e gestione archivi, un 
programma grafico ed un pro¬ 
gramma applicativo-didattico. 
JANE WRITE - JANE CALC - 
JANE LIST c un programma che 
elimina la necessità di dover fami¬ 
liarizzare con i comandi. 

Tutte le opzioni sono selezionabi¬ 
li grazie alle figure che appaiono 
nella parte superiore dello scher¬ 
mo e che rappresentano le funzio¬ 
ni desiderate (le finestre del Ma¬ 
cintosh fanno storia...). 

MICRO ILLUSTRATOR è un 
programma che sfrutta al massi¬ 
mo le capacità grafiche del CI28. 
fornendo uno strumento sofisti¬ 
cato ed al contempo semplice da 
usare, che permette di realizzare 
qualsiasi tipo di elaborazione 


MORROW PIVOT 2 


grafica, compresi disegni animati, 
videogiochi ed altre applicazioni 
senza che occorra una specifica 
preparazione artistica. 

SKY TRAVEL c una finestra 
sull'universo. 

Si tratta di un programma di 
astronomia con il quale si posso¬ 
no studiare i pianeti, le stelle ed i 
fenomeni celesti appartenenti alla 
nostra galassia. 

Il programma, realizzato molto 
bene da un punto di vista grafico, 
permette di seguire le evoluzioni 
dei moti stellari nel passato, cosi 
come nel futuro; una sorta di pla¬ 
netario elettronico personale. 
Anche la gamma degli accessori si 
arricchisce di nuovi prodotti: 
il floppy disk drive 1570 da 170 
KBytes formattati è compatibile 
con il 1541, collegato al CI28 in 
modo CP M si configura come 
MFM compatibile capace di 
170K a singola faccia/doppia 
densità; il monitor 1901 è un mo¬ 
nitor ad alta risoluzione a colori 
che permette la visualizzazione su 
40 oppure 80 colonne grazie alle 
sue tre interfacce, RGB colore 
per le 80 colonne, dotata anche di 
un quarto segnale denominato 
intensity. Video composito siste¬ 
ma PAL per le 40 colonne oppure 
Video Commodore (Luma-Cro- 
ma-Audio) sempre a 40 colonne; 
l'ultima novità in fatto di acces¬ 
sori è rappresentata dal mouse 
1350 che permette di controllare 
le informazioni in modo facile e 
diretto agendo sul video. 

Per ulteriori informazioni la 
Commodore mette a disposizione 
degli utenti una linea telefonica a 
cui si può telefonare dalle 14 alle 
18 ed il cui numero è 
02/61832245. 

EIT 

Personal 

Scanner 

Si tratta di una apparecchia¬ 
tura che rileva automatica¬ 
mente un foglio stampato, 
dattiloscritto o redatto a ma¬ 
no e ne trasferisce l'immagi¬ 
ne nella memoria di massa di 
un calcolatore, con possibili¬ 
tà di richiamo ( video o stam¬ 
po). 

I. 'apparecchiatura è partico¬ 
larmente adatta alla archi¬ 
viazione di documenti, al 
controllo di manoscritti - ad 
esempio per il controllo di 
una firma. 
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NUOVO NASTRO PER COMPUTER IN CARTRIDGE BASF 


Il 1985 segna una lappa signi rica¬ 
li va per il nastro magnetico per 
la registrazione dei dati. 

Dopo più di un decennio di mi¬ 
glioramenti marginali nelle per¬ 
formance dei nastri per la regi¬ 
stra/ione dei dati arrivano sul 
mercato i nuovi nastri in card- 
tridge. 

Con questo nuovo sistema il na¬ 
stro ritrova una posizione di 
estrema importanza nella gerar¬ 
chia dei supporti magnetici. Il 
mercato per questi nuovi cartrid- 
ge si estende lino alla gamma dei 
piccoli computers. 

L'utilizzo del biossido di cromo, 
di pigmenti ad alta energia c di 
un'avanzata tecnologia della te¬ 


stina magnetica ha reso possibile 
un considerevole balzo in avanti 
nella densità di registrazione. 

La BASF che vanta un'esperien¬ 
za decennale nella produzione, 
nella ricerca e ncH'applicazionc 
del biossido di cromo conside¬ 
rato uno dei punti fermi per i na¬ 
stri audio e video ha deciso di 
investire questo bagaglio di cono¬ 
scenze nella nuova generazione di 
nastri in cartridge. 

Il biossido di cromo rende possi¬ 
bile la fabbricazione di nastri con 
queste eccezionali qualità: 

altissima densità di registra¬ 
zione; 

possibilità di cancellare e re¬ 
gistrare nuovamente i dati sul 


nastro: 



stabilità meccanica e termica 
costantemente alta e tollerante al¬ 
le proprietà elettromagnetiche; 

bassa attrazione dello sporco. 

Il biossido di cromo permette al¬ 
l'utente di raggiungere altissime 
capacità in una nuova, conve¬ 
niente confezione cartridge. 

La BASF ha il grosso vantaggio 
di poter utilizzare per questo nuo¬ 
vo sistema cartridge. la tecnolo¬ 
gia ed alcuni processi produttivi 
sviluppati nel settore della lavo¬ 
razione delle materie plastiche, c 
nella massiccia produzione di cas¬ 
sette audio c video. 

Questi nuovi cartridge sono uti¬ 
lizzabili sul sistema a nastro ma¬ 
gnetico IBM 3480. 


RB5X PERSONAL ROBOT 


Ricordate C3P8 ed R2D2?... 

I simpatici protagonisti «positro- 
nici» della saga di Guerre Stella¬ 
ri... 

II personal robot RB5X di produ¬ 
zione RB Robot, ora distribuito 
in Italia dalla SIRIUS ELET¬ 
TRONICA, c molto simile a 
R2D2. 

Si tratta di un robot molto fun¬ 
zionale che gode di una grande 
popolarità fra gli sperimentatori 
d oltreoceano. grazie soprattutto 
alle sue capacità ottenute tramite 
un proprio processore del tipo 
INS8073 N.S. ed alla sua memo¬ 
ria in configurazione base di 8K 
RAM. 

RB5X si presenta subito molto 
bene, forse in virtù della carrozze¬ 
ria in alluminio, sormontata da 
una simpatica cupola in policar- 
bonato. e per le sue dimensioni da 
«nanerottolo» che si limitano a 
circa 60 cm di altezza per un dia¬ 
metro di 33 cm. 

Moltissimi sono i sensori di cui c 
dotato, oltre alla possibilità di 
poter usare un braccio meccanico 
completamente programmabile. 
La velocità di movimento del ro¬ 
bot è di circa IO cm secondo, una 
fascia di 8 interruttori perimetrali 
disposti sulla parte inferiore svol¬ 
gono la funzione di rivelatori 
d'urto. 

Altri sensori sono rappresentati 
da un rivelatore a raggi infrarossi 
disposto tra le ruote, che permet¬ 
te di «inseguire» piste in nastro 
adesivo lucido: un dispositivo ad 
ultrasuoni permette di rilevare 
eventuali ostacoli nell'arca ante¬ 
riore al robot. 

I due motori per lo spostamento 
nelle varie direzioni sono alimen¬ 
tati da batterie ricaricabili con un 


apposito caricabatteric automati¬ 
co della potenza di 1.5 A su 7.5 
Volt. 

AlLintcrno della cupola si posso¬ 
no scorgere 5 led programmabili 
ed altri 4 a lampeggio casuale. 

Tra gli accessori a disposizione 
per RB5X il più importante da 
scngalare è la porta RS232 stan¬ 
dard con velocità di trasmissione 
selezionabile tra I IO e 2400 baud. 


che permette la programmazione 
in NSC Tiny BASIC, una sorta di 
dialetto BASIC, direttamente da 
un personal computer. 

Moduli software sono disponibili 
su cartuccia EPROM. per cui è 
già prevista una memoria di 2-4K 
in aggiunta ad una eventuale 
espansione di 16K opzionali, e 
rappresentano una chiara dimo¬ 
strazione delle qualità del robot. 


Tra i programmi sono da segna¬ 
lare quello di simulazione BETA, 
con controllo del SONAR, au¬ 
toapprendimento. ricerca auto¬ 
matica del caricabatteria, auto¬ 
diagnosi ed attivazione della 
scheda vocale su cartuccia; i pro¬ 
grammi dimostrativi delle capaci¬ 
tà vocali in inglese (volendo an¬ 
che italiano), del movimento del 
braccio, fondato su un classico 
degli esempi di programmazione 
per applicazioni industriali. 

Come tutti gli altri personal ro- 
bols, RB5X è un prodotto d'a¬ 
vanguardia per il quale è difficile 
dire quali possono essere i campi 
di applicazione, ma una grossa 
fascia di utenza potrebbe essere 
rappresentata da tutti coloro che 
per ragioni di lavoro, sentano la 
necessità di dover ricorrere ad un 
simulatore di sistemi di robotica 
industriale, in questa occasione si 
pucS dimostrare particolarmente 
utile il braccio di RB5X. dotato 
di ben 5 articolazioni c di una 
programmazione del tutto simile 
a quella dei robots industriali. 
Probabilmente non saranno po¬ 
chi gli istituti tecnici informatici e 
per meccanici che adotteranno 
RB Robot per i loro laboratori di 
formazione professionale. 

Adesso non resta che sviluppare 
software di supporto per applica¬ 
zioni più «cascreccc» quali sorve¬ 
glianza. intrattenimento, pubbli¬ 
cità. 

Per ulteriori informazioni 
ci si può rivolgere a: Sl- 
RIUS ELETTRONICA - 
Pai. F2 Milanolìori - 
20094 Assago (MI) Tel. 
(02)8245321 
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PARTITA UN PO’ IN SORDINA HELLO SCORSO NUMERO 
— CON SOLO TRE PAGINE DEDICATE — LA NUOVA RU¬ 
BRICA “CINEMA E COMPUTER” SI È GIÀ ARRICCHITA ED 
‘EVOLUTA’, GRAZIE ALLTJTILIZZO SEMPRE PIÙ MASSIC¬ 
CIO DI QUESTO ‘MIRACOLO TECNOLOGICO’ NEI PIÙ SVA¬ 
RIATI SETTORI DELLO SPETTACOLO. 

DA QUI IL NUOVO TITOLO — NON SOLO COMPUTER — 
CON IL QUALE VOGLIAMO INDICARE UNA RUBRICA NEL¬ 
LA QUALE TROVERANNO SPAZIO, DI VOLTA IN VOLTA, 
ARTICOLI DEDICATI ALL’ANALISI DI TUTTE LE FORME 
DI ESPRESSIONE VISIVA ‘COMPUTERIZZATA’. 


VIDEODROME 

L’uomo terminale di Cronenberg 

di Osvaldo Contenti 


preregistrati. Il protagonista del film 
si trova coinvolto casualmente nella 
scoperta di alcune trasmissioni tele¬ 
visive «pirata» delle quali cerca di sco¬ 
prire la fonte di produzione ed emis¬ 
sione; riesce così a introdursi nell’or¬ 
ganizzazione che fa capo alla ricerca 
di distruzione e cooptazione di un 
pubblico considerato inferiore e per¬ 
ciò destinato ad essere usato o elimi¬ 
nato, secondo un concetto di purifica¬ 
zione della razza in cui i più deboli e i 
diversi devono essere soggiogati. 
Vittima e cavia di questo processo è 
un piccolo produttore che vuole usare 
per la propria rete privata le immagi¬ 
ni della trasmissione chiamata «vi- 
deodrome»; egli riesce ad appropriar¬ 
si di videocassette che fanno insorge¬ 
re in lui allucinazioni visive e poi in¬ 
controllabili mutazioni: la sua volon¬ 
tà comincia a disgregarsi; il video, di¬ 
ventato vivo e palpitante, comanda le 
sue azioni; il suo corpo, diventato ter¬ 
minale, ingloba le videocassette ed 
esegue gli ordini preregistrati. Lenta- 


Woods e la Harry (ex cantante dei “Blon- 
die ") in una scena del film. 


Il ciclo evolutivo dell’uomo sembra 
compiersi, nei fìlms di David Cronen¬ 
berg, in un accentuarsi delle facoltà 
mentali che opera come mutazione 
attraverso cui il corpo cambia le sue 
capacità di controllo dei processi fìsi¬ 
ci. Così succedeva in: «Brod, la nidiata 
malefica»; «Scanners»; «Dead zone», ma 
in questo suo «Videodrome» (film del 
1982, di prossima uscita in itali a do¬ 
po il successo avuto al MYSTFEST di 
Cattolica ’84) il regista canadese lega 
il concetto di espansione dei poteri 
della mente e quello della comunica¬ 
zione visiva, portando all’inverosimi¬ 
le quelle ipotesi di controllo delle vo¬ 
lontà, di lavaggio del cervello che ten¬ 
dono a verificarsi attraverso il mezzo 
televisivo. 

Cronenberg immagina un possibile 
futuro in cui le onde televisive diven¬ 
tano pulsazione materiale che pene¬ 
tra nei corpi e genera organismi che 
distruggono il pensiero, tumori che 
svolgono programmi precostituiti. 
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Tra poco Reno infilerà la lesta nel video in uno degli effetti più impressionanti del film. 
Max Renn (Woods) nel pieno di una delle sue allucinazioni in Videodrome. 



James Woods e Deborah Harry, in un altra scena di Videodrome. 



mente ma inesorabilmente lo scam¬ 
bio si compie: l’uomo è diventato un 
computer programmabile e il video il 
suo padrone intelligente, mosso da 
un istinto volontario. 

Nella sua attività di mero esecutore di 
ordini voluti da altri, il protagonista 
trova la scintilla di rivolta ed è in que¬ 
sto spunto centrale che Cronenberg 
imposta la sua favola morale. Dopo 
aver enunciato i rischi dello svuota¬ 
mento di idee che preesiste al concet¬ 
to di operazioni comunicative e di 
rappresentazione preformate, egli 
stimola la richiesta di un riappro- 
priamento delle funzioni intellettuali, 
ponendo alla base del suo discorso il 
rischio di una parcellizzazione delle 
attribuzioni che sia nient’altro che ri- 
produzione di termini già dati, già 
confezionati secondo i desideri di chi 
detiene le fonti di informazione. 

Il solco tra macchina e uomo, tra 
emozione e scientificità deve rimane¬ 
re ben tracciato, altrimenti si rischia 
la perdita della specificità ed essenza 
delle connotazioni umane. Il mezzo 
deve rimanere un tramite, uno stru¬ 
mento che allarghi le capacità e facol¬ 
tà intellettive, diventando principal¬ 
mente strumento di conoscenza per 
tutti. 

Ma Cronenberg non può considerarsi 
un ottimista: la sua visione del mon¬ 
do si rifa ad una concezione meccani¬ 
ca dei rapporti umani, in cui l’intelli- 
genza diventa piano di scontro e di 
dissoluzione. L’unico modo di esistere 
oggi, sembra dirci Cronenberg, è quel¬ 
lo del soffocamento degli istinti, delle 
passioni, fino a crearsi un guscio in¬ 
dividuale che diventi corazza ermeti¬ 
ca contro il mondo. Anche lo scienti¬ 
smo che caratterizza il regista è vis¬ 
suto da questi (e dai suoi personaggi) 
come male dizione ancestrale che va 
punita o, ironicamente, come potere 
intellettivo che va occultato alla mas¬ 
sa di inebetiti videodipendenti. 

É, questa, una reazione di difesa al 
tentativo di allineamento delle co- 


Un primo piano di James Woods, alias Max 
Renn, protagonista di Videodrome. 
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scienze ed un riflettore sulle conse¬ 
guenze negative che si abbattono su 
chi cerca di essere agente primario di 
scelte proprie. La scienza, perciò, non 
è considerata da Cronenberg -'perico¬ 
losa» se non quando si scontra con le 
decisioni del potere. 

Nella parabola di Max Renn (un in¬ 
quietante James Wood) si realizza 
rultimo passaggio dall’universo del 
reale a quello «rappresentato» in cui 
tutto ( anche le immagini di fatti di 


cronaca) diventa spettacolo, rappre¬ 
sentazione, appunto, e perciò stesso 
finzione di una oggettività che non è 
mai tale, ma che serve solo a manipo¬ 
lare le informazioni secondo modi di 
interpretazione utili a chi ne possie¬ 
de il controllo. 

Lo stesso Max è una proiezione del 
video, l’emanazione fisica «in diretta» 
di quella parodia di vita che si agita 
nei serials televisivi. Ecco dunque il 
riscontro sociale: anche noi siamo de¬ 


stinati a diventare le copie viventi dei 
vari personaggi che affollano il picco¬ 
lo schermo; già siamo abituati a par¬ 
lare, a vestire o comportarci come gli 
«eroi» delle varie «breakfast’s series» 
(come si potrebbe chiamare quei tele- 
films su Puffi - Poliziotti - Arnold - 
Dallas - Dynasty Telenovela che ven¬ 
gono mandati in onda nelle ore dei 
pasti), ma Tinquadramento non è an¬ 
cora completato; per l’intelligenza c’è 
forse una via di scampo. 


Guida agli effetti speciali di Videodrome 


Autore esclusivamente di pellicole di 
genere fantastico, David Cronenberg ha 
sempre curato particolarmente l’aspetto 
dei trucchi e degli effetti speciali 
all’interno delle sue opere. E benché 
Videodrome sia una pellicola realizzata 
ormai nel 1982 i suoi effetti conservano 
una potenza e un’efficacia visiva da non 
sfigurare affatto accanto a quelli di 
produzioni più recenti. Responsabile di 
questa branca del film è stato il 
lanciatissimo Rick Baker, a cui già si 
devono gli effetti di «Un lupo mannaro 
americano a Londra» e del famosissimo 
videoclip «Thriller» di Michael Jackson In 
un film dove succede di tutto Baker ci 
mostra l’impossibile: un televisore che 
prende vita e si ricopre di mille venature 
pulsanti; un uomo che infila la testa in un 
apparecchio TV; una pistola che si fonde 
«organicamente» con la mano che la 
stringe, e soprattutto l’impressionante 
«apertura» che il protagonista Max Renn 
(James Woods) ha sul torace, apertura in 
cui a più riprese vengono infilati oggetti 
come pistole o videocassette. 

La maggior parte di questi trucchi è stata 
realizzata grazie a una tecnica chiamata 
«prosthetics», di cui Baker è attualmente 
forse il maggior esponente ( insieme a Rob 
Bottin, artefice dei trucchi de «La Cosa» di 
John Carpenter). Tale tecnica consiste in 
una serie di vesciche e camere d’aria 
realizzate in materiale speciale, il LATEX, 
usato anche in medicina. Applicando 
queste vesciche sul corpo dell’attore, e 
collegandole con tubicini attraverso cui 
passa l’aria, si può creare l’illusione di 
parti del corpo che si trasformano, 
ingrandendosi o ritirandosi, oppure 
l’effetto di materiali inanimati che 
prendono vita, come nel caso del 
televisore che si «anima», pulsando e 
rivelando delle venature molto 
realistiche. Solo per la scena del televisore 
sono state necessarie 72 differenti 


«vescichette» collegate ad altrettanti tubi, 
in cui veniva immessa l’aria grazie a una 
tastiera ( simile a quella di un organo ) che 
azionava delle valvole. Ogni valvola apriva 
il passaggio d’aria a un tubicino. Per 
azionare la tastiera ci volevano almeno 
tre operatori Problemi diversi invece, per 
la sequenza in cui Max infila la testa nel 
televisore: occorreva un materiale che 
non aderisse alla faccia dell’attore e dopo 
aver fatto delle prove addirittura con un 
pallone-sonda meteologico, Baker ha 
trovato quello che cercava in una gomma 
chiamata DENTALO AM, materiale usato 
specialmente in odontoiatria, per 
costruire ponti e dentiere. Dopo aver 
dipinto di bianco uno strato di tale 
sostanza è stato infilato il tutto all’interno 
di un fìnto televisore, consistente nel solo 
involucro. Dietro la superficie bianca ed 
elastica così ottenuta è stato posto uno 
schermo di plexigas attraverso cui 
venivano proiettate le immagini che il 
finto televisore trasmetteva. Con il 
sistema di immissione deh'aria che 
abbiamo già descritto, la superficie 
gommosa ha cominciato ad espandersi, 
mostrando così l’illusione di uno schermo 
vivente che, continuando a trasmettere 
immagini (un primo piano delle labbra di 
Debbie Hany ) tentasse, espandendosi, di 
inglobare la testa del protagonista. 

Nessùn pericolo per l’attore, che ha 
tranquillamente infilato la testa nella 
gomma senza bisogno di controfigura. 
Nella sequenza in cui un braccio armato di 
pistola fuoriesce dallo schermo è stato 
usato lo stesso principio. Un tecnico con 
in mano una pistola ha spinto dall’interno 
del televisore lo strato di DENTALO AM, 
che ha cominciato così ad aderire al suo 
braccio, sembrando un qualcosa che 
nascesse dal televisore stesso. In questo 
caso le immagini sono state proiettate da 
davanti, dalla stessa angolazione della 
macchina da presa. Come era intuibile, la 


scena della pistola che diventa tutt’uno 
con la mano e le varie sequenze dove 
appare la «fessura» sul torace di Max sono 
state realizzate con l’ausilio di fìnte parti 
umane. Una «mano» in latex con dei 
meccanismi all’interno per la sequenza 
della pistola, e un torso che riproduceva le 
fattezze di quello del protagonista ogni 
volta che veniva inquadrata l’inquietante 
«feritoia». 

L’unico effetto dove si è reso necessario 
l’uso del computer è consistito nella 
elaborazione delle immagini video che si 
vedono quando Max indossa l’elmetto 
«Accumicon», una sorta di 
registratore-analizzatore delle sue 
allucinazioni. Nella sequenza appare una 
stanza vuota vista in «soggettiva», cioè 
mostrandoci quello che vede il 
protagonista. Entra una donna nella 
stanza e porge una frusta a Max, mentre 
intorno a lei la scena si trasforma in una 
camera di tortura. All’inizio 
dell’allucinazione le immagini sono come 
in un mosaico, poi l’effetto diminuisce fino 
a scomparire. Il supervisore agli effetti 
video, Michael Lennick, ha ottenuto 
questo risultato con un Digitalizer NEC, 
alzando la risoluzione dell’immagine, 
girata in elettronico, fino a che ogni linea 
della composizione fosse «scalata» rispetto 
alla precedente (un po’ quello che si vede 
attraverso l’obiettivo di una reflex quando 
il soggetto non è a fuoco ). A poco a poco la 
risoluzione veniva abbassata ai valori 
normali, eliminando l’effetto «mosaico». 
Impossibile a crearsi altrimenti, questa 
procedura ha confermato l’enorme 
gamma di effetti che il connubio 
immagine video-computer processing può 
permettere. Sta a registi «audaci» e 
preparati come Cronenberg far sì che tali 
effetti non oltrepassino il confine che 
separa la ricerca formale dal 
sensazionalismo a tutti i costi. 

Paolo Penza 
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IL COMPUTER NEL MONDO DEI 

VIDEO-CLIPS MUSICALI 


Proseguendo la nostra indagine-dos¬ 
sier sullo strapotere invadente, ma 
benevolo e lungimirante del caro- 
computer nell’era contemporanea ci 
siamo andati a documentare «quan¬ 
to», «dove» e «come» l’uso del computer 
riesca creativamente a manipolare le 
immagini del video-clip promoziona¬ 
le che tanto successo, a hvello di mas¬ 
sa video- dipendente, sta riscuotendo 
negli Stati Uniti, grazie a canali spe¬ 
cializzati coma la MTV, o, Videomusic, 
in italia, che trasmettono musica visi¬ 
va 24 ore su 24. 

In linea di massima, diciamo che le 
infiltrazioni esterne sono sempre esi¬ 
stite sin dai giorni del «Magica 1 Miste- 
ry Tour» dei Beatles, ove l’immagine 
quadrimensionale di George Harri- 
son nel brano «Blue Jay Way» e le pen¬ 
tadimensionali immagini finali dello 
scendiscale alla Wanda Osiris in «You 
Mother Should Know» ottenute con le 
prime, e già oggi considerate rozze, 
apparecchiature elettroniche, ridda¬ 


ci i S. D'Alesio 

marono l'attenzione della nouvelle 
vague sonora alla fine dei sixties e al- 
1 inizio dei ruggenti Anni Settanta. 

Già, già questa è la preistoria del vi¬ 
deoclip artefatto, ma, si sa, i Beatles 
sono in ogni campo considerati un 
punto di partenza e d’arrivo, anche 
sotto il profilo tecnico che è quello 
che in questa sede più ci interessa. 
Col trascorrere degli anni e l’evolver¬ 
si delle tecniche di registrazione dei 
dischi, anche il modo di filmare i vi¬ 
deo-clips, sia di breve durata che cosi¬ 
detti long-form, è mutato: aprendosi 
verso stimoli esterni che accoglieva¬ 
no sempre più frequentemente l'in¬ 
tervento e la tecnico-dipendenza da 
computers Graphics, dagli Apple e dal 
Fairlight C.M.I. che lo stesso Peter Ga¬ 
briel, seguito da David Bowie, Brian 
Eno e Robert Fripp cominciò ad usare 
in maniera plateale ed irriverente, ot¬ 
tenendo alla pari dalla sua effetti 
straordinari, esplosi, poi, nel brano 
«Shock The Monkey» che ricevette nel 


1982 un successo incredibile, grazie 
a dei Syco Systems che, collegati ap¬ 
punto al Fairlight C.M.I., schermava¬ 
no graficamente delle immagini co¬ 
lorate sul monitor-video del compu¬ 
ter in base alla musica trascritta 
con la tastiera o sonorizzata nei na¬ 
stri. 

L’inizio di una nuova era si sta tradu¬ 
cendo, negli ultimi tempi, in una 
realtà affascinante, tecnicamente 
perfetta che fa apparire i divi preferi¬ 
ti quasi alla stregua di eroi alieni sce¬ 
si sulla Terra per acquisire fama, dol¬ 
lari e la benedizione di un pubblico 
oceanico. Anche questo mese, abbia¬ 
mo cercato di reperire e segnalarvi 
tre «campioni» davvero speciali, ove 
musica, computer ed immagini ven¬ 
gono straordinariamente accomuna¬ 
te, filtrate ed agitate in un acetato 
melange dall ’ effetto, senza mezzi ter¬ 
mini, catalizzatore. Sicché questo è 
quanto, se a voi interessa e piace. C’è 
di che stupirsi... 


STAR TREK III 

UN GRANDE FILM ED UN GRANDE VIDEOGIOCO 


Verrà prossimamente programmato 
sugli schermi americani un film 
distribuito dalla PARAMOUNT — 
membro del gruppo GULF & 
WESTERN di cui fa parte anche la 
SEGA 

Il film che verrà pubblicizzato con un 
investimento di molti milioni di 
dollari, si chiama “Star Trek III: The 
Search for Spock'’ (Alla Ricerca di 
Spock). 

Gli effetti speciali presenti nel film 
sono stati realizzati dai creatori di 
Guerre Stellari e dei precedenti films 
della stessa serie che hanno 



comunque creato nuovi “alieni", 
nuovi veicoli spaziali. 

La SEGA ha già creato, sulla base del 
film, un grande videogioco a gettone 
con tecnologia a disco laser presto 
disponibile nei locali pubblici. 

Ma la notizia che più interesserà è 
senz’altro questa: la Divisione 
Consumer Products della SEGA ha già 
derivato dal videogioco a gettoni una 
versione “domestica”, studiata per 
tutti i più diffusi sistemi di gioco ed 
home-computers. 

Un grande film ed un grande 
videogioco da non perdere! 
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THEGABS 
«Heartbeat City» 

Warner Home Video, disponibile in Hi- 
Fi Stereo - Dorata 48 minuti - Lire 
68 . 000 . 

Questo è certamente uno dei video¬ 
clip più moderni e sofisticati tecnicamen¬ 
te. Ha vinto il Grammy Award per la sta¬ 
gione passata, grazie ad una manipolazio¬ 
ne e sovrabbondanza d’effetti scenici, gra¬ 
fici, fantascientifici e coreografici che oc¬ 
correrebbe un libro per descriverli e va¬ 
gliarli singolarmente. Diciamo che alla pe¬ 
rizia dei Cars di Rick Ocasek va aggiunto il 
tocco dello stilista tuttofare newyorkese 
che risponde al nome di Andy Warhol, un 
vero mago nel suo genere di perizie visive 
artefatte. 

Due tecnici-musicisti americani (Greg 
Hawkes e David Robinson) e un giappone¬ 
se (mr. Topeka) hanno programmato il 
Fairlight C.M.I. in una maniera spettaco¬ 
lare, onde ottenere, come dicevamo sopra, 
una pressoché continua sovrapposizione 
d’immagini, fotografie, colore e bianco e 
nero all’interno dello stesso quadro visivo, 
ove piccole e grandi figure vengono scon¬ 
tornate, ingrandite e mutano espressione 
con trovate esilaranti: dalla bocca di una 
donna escono fiumi di parole che vanno a 
disporsi diligentemente, seguendo un ordi¬ 
ne computerizzato, sul video; dal rubinetto 
di un Grand Hotel si materializzano mac¬ 
chine sportive, onde oceaniche, vele spor¬ 
tive ed addirittura King Kong. Grazie a 
questi stimoli, ascoltare e vedere sullo 
schermo le note di «Hello Again*, -Shake It 
Up», «Panorama» e molte altre canzoni si 
tramuta in una esperienza, a dir poco, ec¬ 
citante, che potrebbe diventare fonte di 
studio ed ispirazione per gli addetti del set¬ 
tore nostrani sempre alla ricerca di nuove 
idee. 



THE HOLDING STONES 
«Video Rewind» 

Vestron Music Video, disponibile in Hi- 
Fi Stereo - Durata 60 minuti - Lire 
68.000 

Per questa storia musicale degli Stones, 
ridotta in un video concettuale di appena 
60 minuti si sono scomodati in molti Buo¬ 
na l’idea. Cattiva la realizzazione. Vediamo 
insieme perché: si parte dal fatto che sono 
trascorsi 20 anni e passa dal mito Stones 
di «Brown Sugar», «Jumpin’ Jack Flash» ed 
«It’s Only Rock’n’Roll»... Ora le immagini, 
considerate delle sacre reliquie, vengono 
tenute conservate in un museo degli orro¬ 
ri londinesi, ove uno strano custode, assai 
simile al bassista Bill Wyman, inizia a rie¬ 
sumarle, «scongelando» Mick Jagger da 
una quasi fatale ibernazione, onde ottene¬ 
re un commento in diretta da uno dei pro¬ 
tagonisti. 

Il nostro computer entra in azione, con 
grandi effetti e largo dispendio di mezzi, 
dobbiamo confessare, per l’autocelebrati- 
va riedizione di «Brown Sugar» uno dei 
brani più noti del gruppo. H pezzo viene 
mixato da un Graphics che unisce grafica- 
mente le immagini di tre concerti delle 
Pietre Rotolanti, datati esattamente 1970 
(in bianco e nero), 1973 e 1982, unendole 
concettualmente in modo perfetto nelle se¬ 
quenze visive e sonore. L’altro intervento 
appartiene, invece, alla serie delle manipo¬ 
lazioni colorate: «Emotional Rescue», can¬ 
tata metà in falsetto, metà con voce ne- 
groide da Jagger, esce visivamente dal 
contesto della live performance per entra¬ 
re in un mondo computerizzato alla «Tro- 
ne» dove due Stones (Mike e Keith) vengo¬ 
no prima scontornati ed inflacciditi nel lo¬ 
ro peso, poi colorati di verde, rosso e gri¬ 
gio, subendo graficamente delle scosse 
elettriche che sono poi, in realtà, gli stimo¬ 
li e gli impulsi comandati dalla stessa ta¬ 
stiera del computer. E tutto questo mentre 
lo strano custode e il redivivo Jagger, ri¬ 
presosi dall’ibernazione, scorrono veloce¬ 
mente su di uno schermo-monitor collega¬ 
to ad un computer Apple, ricostruito con 
un pizzico di malcelata fantascienza umo¬ 
ristica, su scala gigante, tutte le immagini 
di repertorio memorizzate nei circuiti del 
cervellone. 



THE PODICE 
«Synchronicity Concert»» 

Rea/ Columbia Pictures, disponibile in 
Hi-Fi Stereo - Durata 78 minuti - Lire 
48.000 

Uno dei più venduti e ricercati lon- 
g-form video-clips di musica rock degli An¬ 
ni Ottanta, interpretato dai tre cavalieri 
dell’apocalisse: Sting (alias Gordon Su- 
mner, attuale divo cinematografico), Ste¬ 
wart Copeland ed Andy Summers, membri 
dei Police, una band attualmente disciolta 
per permettere ai singoli musicisti di ci¬ 
mentarsi nei campi più disparati. Questo 
«Synchronicity Concert», inciso, registrato 
e manipolato con l’ausilio delle tecniche 
più perfezionate ed oggi disponibile anche 
ad un prezzo più accessibile, grazie alla di¬ 
stribuzione nei negozi della Rea Italiana, è 
stato sottoposto ad un bagno di manipola¬ 
zione elettronica visiva, dopo esser stato 
girato alla Omni Arena di Atlanta in Geor¬ 
gia negli Stati Uniti. 

Le tecniche di scontomamento, princi¬ 
palmente incentrate su Sting, sono state 
ottenute con un prodigioso Graphics che 
nel brano «Tea In The Sahara» lo ha estrat¬ 
to dalla scena facendolo saltare e muovere 
al rallenti, mentre i suoi compagni conti¬ 
nuavano ad agitarsi normalmente. Pano¬ 
ramiche della folla a strisciate, in bianco e 
nero e colori contemporaneamente, e mil¬ 
le altre diavolerie d’effetto fanno apparire 
questo concerto più simile ad un adorabile 
circo circense dai fuochi d’artificio tecno¬ 
logici che ad imo spettacolo di musica 
rock. Le emozioni non mancano, vedere 
per credere. 


TUTTI I VIDEO-CLIPS ESAMINATI IN QUE¬ 
STO NUMERO SONO DISPONIBILI PRESSO: 
GOODY MUSIC - VIA F. CANAJRA, 19- ROMA 
- TEL. 06/3610959 - VENDITA DIRETTA E 
PER CORRISPONDENZA. 
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a cura di A. Corica 


La recensione software di questo 
mese è interamente dedicata ad 
una serie di programmi educativi 
per lo ZX-Spectrum 48K, edita dalla 
Sinclair in collaborazione con la 
Macmillan Education - una delle 
più famose e accreditate (Harold 
Macmillan è stato Primo Ministro, 
n.d.r.) Case Editrici britanniche del 
settore. 

La serie, chiamata semplicemente 
LEARN TO READ - Impara a 
leggere - è stata progettata allo 
scopo di aiutare i bambini ad 
apprendere, giocando, l'alfabeto, a 
familiarizzare con lo scritto e 
quindi ad esercitarsi nella lettura. 
La serie completa consta di cinque 
programmi ed ognuno di questi, 
stilato su basi strettamente 
scientifico/didattiche avanzate, 
mostrando esempi di vita comune 
tratta un argomento specifico. 
Sull'utilità della serie dedicata ai 
piccoli scolari britannici non ci 
sono dubbi. Tralasciando qualsiasi 
considerazione sulle diversità di 
impostazione del sistema 
scolastico italiano (in Gran 
Bretagna il computer è da tempo 
sussidio didattico nelle scuole di 
ogni ordine e grado), vorremmo 
comunque sottolineare 
l'importante ruolo che tale serie di 
programmi, lungi dall'essere un 
vero e proprio corso, può rivestire 
per tutti quei bambini che, grazie 
alle lezioni a carattere annuale 


istituite in molte scuole elementari 
statali e non o a corsi in Istituti 
specializzati privati, si trovano a 
muovere i primi passi 
neli’apprendimento della lingua 


LEARN TO READ 1 

Questo primo programma è adatto ai 
bambini che stanno da poco imparando 
a leggere. 

È diviso in quattro sezioni, ognuna del¬ 
le quali sviluppa una delle parti centrali 
del processo di lettura — riconosci¬ 
mento lettere dell'alfabeto, vocabolario 
visivo, compito delle parole e memo¬ 
ria. 

Il programma è, dal punto di vista visi¬ 
vo, molto accattivante essendo i perso¬ 
naggi protagonisti dei simpatici e colo¬ 
ratissimi animaletti identificati, proprio 
come i cuccioli domestici, da nomi pro¬ 
pri come, ad esempio, il cane Ben ed il 
gatto Jip. 



inglese. 

Ricordiamo che ogni programma è 
accompagnato da adeguata 
documentazione per genitori e/o 
insegnanti. 


LEARN TO READ 2 

Il secondo programma della serie 
estende i fondamenti appresi nel pri¬ 
mo, offrendo in proposito ulteriori eser¬ 
cizi e presentandone contemporanea¬ 
mente di nuovi tendenti allo sviluppo 
delle facoltà logiche. 

Al vocabolario di base vengono ag¬ 
giunti nuovi vocaboli ed aggettivi, quali 
«red», «green», «ship», «car», «bus». In 
Learn To Read 2 il bambino può inoltre, 
grazie alla particolare struttura del pro¬ 
gramma, constatare visivamente quan¬ 
to appreso. 
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LEARN TO READ 3 


Il terzo programma della serie offre 
una sintesi dei primi due, permettendo 
al bambino di esercitarsi maggiormen¬ 
te su quanto imparato e prendere confi¬ 
denza con il complesso processo di 
apprendimento della lettura. 

Learn To Read 3 è diviso in quattro se¬ 
zioni ognuna delle quali presenta situa¬ 
zioni animate coloratissime, al fine di 
catturare l’attenzione e colpire la fanta¬ 
sia dei piccoli utenti. 

Anche in questo programma il vocabo¬ 
lario di base viene arricchito. A questo 
punto il bambino dovrebbe essere in 
grado di leggere correttamente oltre 
trenta parole. 


LEARN TO READ 4 

Il programma è stato identificato dagli 
stessi autori come il «programma del¬ 
l'Alfabeto». 

Grazie a vari esercizi, molto stimolanti, 
viene offerta al bambino la possibilità 
di esercitarsi con l'alfabeto, sempre 
prendendo ad esempio i vocaboli già 
conosciuti. 

Fra gli esercizi proposti segnaliamo il 
dover individuare iniziali comuni a più 
vocaboli e la ricerca di lettere nascoste 
al fine di completare una data parola. 



LEARN TO READ 5 

Learn To Read 5 inizia ad introdurre al 
bambino concetti astratti, spesso diffi¬ 
cili da capire e ricordare, grazie all'au¬ 
silio di piccole frasi in cui sono compre¬ 
si vocaboli di senso opposto quali «be- 
hind» ed «in front of», «inside» ed «out- 
side». Il programma prima mostra il si¬ 
gnificato delle parole grazie a chiari 
esempi figurati, quindi attraverso due 
simpatici e divertenti giochi verifica il 
livello di apprendimento del bambino. 




FINDERS KEEPERS 
ZX-SPECTRUM 48K 
COMMODORE 64 

Sistemi MSX 
® MASTERTRONIC Ltd. 

Prezzo L. 7.900 

C’era una volta un re. 

Anzi, per l'esattezza, c'erano una volta 
il re di Isbisima e sua figlia, la bella 

principessa Germintrude. 

Come tutti i Sovrani che si rispettino, 
anche il nostro è tutto preso dalla cura 
del proprio reame ed i problemi sono 
cosi tanti da fargli dimenticare addirit¬ 
tura il compleanno dell’adorata figlia. 
Che guaio! Il povero re è disperato: l’u¬ 
nico in tutto il regno a non aver prepa¬ 
rato un dono per la principessa! 

In qualità di «Cavaliere del regno» di 
Isbisima, il sovrano vi ordina di andare 
alla ricerca di un regalo veramente 
speciale per la bella Germintrude. Il 
tempo a vostra disposizione è però, 
molto limitato: il compleanno della 
principessa è infatti domani e, purtrop¬ 
po, il luogo più vicino dove trovare il 
dono è il temuto castello di SPRITE- 
LAND. 

L'impresa non è certo facile e proprio 
per questo il re vi promette che se tor¬ 
nerete in tempo per gli sfarzosi festeg¬ 



giamenti verrete nominato, quale ri¬ 
compensa, «Cavaliere della Tavola Po¬ 
ligonale», la massima onoreficenza 
conferibile, che vi farà entrare tra i Pari 
di Isbisima. 

Detto fatto, eccovi trasportati come per 
magia a Spriteland. Il castello è abitato 
da misteriose e quanto mai strane 


creature e da fantasmi. Vagando da un 
ambiente ad un altro dovrete fare molta 
attenzione alle due segrete-labirinto, 
dalle quali, corre voce, che nessun pro¬ 
de cavaliere sia mai riuscito ad uscire! 
Trovandovi ormai nell’angusto manie¬ 
ro due sono le «vie» che potete segui¬ 
re: cercare di raccogliere quanti più 
preziosi possibile e quindi fuggire da 
Spriteland ricco per non fare ritorno nel 
regno di Isbisima, oppure tentare di ac¬ 
contentare il vostro sovrano cercando 
il dono per la principessa Germintrude 
e quindi entrare nell'Ordine dei Cava¬ 
lieri della Tavola Poligonale. 

Si tratta di un gioco strutturato sulla fal¬ 
sa riga deH'ormai famosissimo «MA- 
NIC MINER» — ad ogni schermo corri¬ 
sponde una particolare parte di Sprite¬ 
land, quale «lo studio dell’astrologo» o 
l’invitante «fabbrica dei gelati» —, dal¬ 
la grafica essenziale ma molto ben cu¬ 
rata, che si avvale inoltre del supporto 
di una simpatica «colonna sonora». 
Risulterà senz'altro godibilissimo a 
quanti amino video-games «riposanti» 
che non tengano il giocatore con i ri¬ 
flessi... a fior di pelle! 

Possibilità di gioco da joystick e/o ta¬ 
stiera. 
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NONTERRAQUEOUS 

ZX-SPECTRUM 48K 

© MASTERTRONIC Ltd. 

Prezzo L. 7.900 

Molti di voi avrannb senz'altro senti¬ 
to parlare, se non addirittura visto, del 
leggendario film «2001: Odissea nello 
Spazio», nel quale il computer di bordo 
della navetta «Discovery» — HAL 9000 
— inspiegabilmente «impazzito» face¬ 
va naufragare la missione preposta 
prendendo il controllo del veicolo spa¬ 
ziale. 

Ebbene anche in «NONTERRA¬ 
QUEOUS» è un computer a farla da pa¬ 
drone. 

Su di un lontano pianeta facente parte 
della «Federazione Intergalattica», il 
Computer principale — preposto alla 
sicurezza — si è improvvisamente im¬ 
possessato di tutti i sistemi di controllo 
che regolano la vita dello stesso e ti¬ 
ranneggia la popolazione, usandola 
come pedine di una gigantesca partita 
a scacchi. 

A nulla sono valsi i tentativi della Fede¬ 



razione di portare aiuto ai poveri abi¬ 
tanti: l’ormai strapotente Computer è 
sempre riuscito ad intercettare, a volte 
anche distruggendole, le navette e le 
astronavi inviate in soccorso, facendo 
fallire tutte le missioni. 

Conscia dell’impossibilità di ricevere 
aiuti dall’esterno, la popolazione op¬ 
pressa ha deciso di tentare di riconqui¬ 
stare l’indipendenza da sola. Per di¬ 


struggere il Computer-Tiranno è stato 
costruito, grazie ai pezzi sottratti da un 
gruppo di coraggiosi in una fabbrica di 
androidi, un Robot-Ricercatore il cui 
compito è quello di penetrare nel Quar- 
tier Generale del Computer, che si tro¬ 
va ben nascosto e protetto in una mon¬ 
tagna, e distruggerlo. 

La montagna è composta da 42 livelli 
suddivisi a loro volta in 3 sezioni, per 
un totale di oltre 1.000 SCHERMI! L’im¬ 
presa non è certo facile, entrare in con¬ 
tatto con gli androidi preposti alla guar¬ 
dia dei vari locali causerà al nostro Ro¬ 
bot una perdita di energia — calcolata 
in livello di PSICHE — mentre finire nel 
raggio di azione di un Lancia-Fotoni sa¬ 
rà purtroppo fatale. 

Questi, dato il gran numero di schermi 
da dover visitare, sono solo parte dei 
pericoli da superare per riuscire a por¬ 
tare a termine la missione. 

Un gioco d’azione certo, ma anche di 
abilità e ragionamento dove un pizzico 
di fortuna sarà senz'altro di aiuto. 
Possibilità di gioco da joystick - Kemp- 
ston, Protek, Sinclair - o tastiera. 



TUFFATI NEL FANTASTICO 
MONDO MASTERTRONIC! 
per vivere nuove emozionanti 
avventure piene di suspence e 
frenetiche animazioni. 


QUALITÀ-PREZZO solo£7.900 è ia grande proposta 
MASTERTRONIC per conquistare tanti amici. *> 

Uasterlronic s a s. : V.l 0 Aguggtari. 62/A • 21100 Varese - & 0332/238898 ” 


dairiNGHILTERRA i 


artuIHUM 
CBM64 


.xS 

Compilate e spedite questo tagliando.con allegate C 500 di francobolli a : 

MASTERTRONIC sa.s. Viale Aguggiari; 62/A-21100 VARESE Nome - 

Riceverete il catalogo computer games MASTERTRONIC con l'elenco Via- 

dei rivenditori di zona. Località__cap.- 

MSX E2K 























5 i 

W O Mj 

DOx 

* LU O 

Odcc 
P co < 
c^p^ 

OC < LU 
LU Q- _I 

Hs 

Q.O? 

LU UJ C/D 

Ili 

y< 

i- cr 

WO 

>- Q_ — 

Ocr-J 

o 8 g 
o§ 


o 

o 

Q_ 


O 


o 

IfE 

>■ D 
Z H 
O LU 
«< 

5 < >< 

<2| 
CQ z LU 

!§s 

§32 

iiT < 

So 

O 
Q 
O 
5 
5 
O 
O 


co 

2 


Q> 

co C 

§ §.2 
~ Cc ,<o 
■0^5 

<D 


v. 

a 

0) 


co 

§s 

11 
03 03 '<0 
co >c -t: 

O O 

m -SS «S — 

S- 2 2 ! 

S § è .£ 

^ o a) "c 
7ò ® e fe 

o) 4 - £ 2 
^ 0) Q) co 

o ' 


O 


co § 

^ C co 

-0) J 11) 
p.^ 

Js 

p: « c 

£> § § 
r\ O È 

9 2 CO 
^ e o 
= o 
co 


0) 

t: 

§ 


"O 

03 


Q.-Ì5 
e «* 
o> 


CL 

0) 


CD 


§ s 

E § 

c. 3 S 

03 O ^ 

rS CD CO 

eg 

n\ 


o 

.c 


CD 


■I il 

8 B-i 

So 

§ I 


0) 

E 

*6 _ 
0) C 

"co CJ 

.8 P 

gS 2 

ÓQ 


Sì 

p) 

CD 

C 

co 

E 


si 


o 

e 

c: 

a 

e 

CD 

E 


- CD 
3 -g 

? 

e" 3 

Q. c 

2:9 E 

2 Q. g 

E^T3 
o^’-B 

*5 

fc ^ ! 3 
2 O -O =~ 

€ 


•So 
- -h 

^ O 
co O 

E^= 
■2 2 

3» 


CD 

C 

o 

N 


8 

3 

O 

E 

a 


5 


É : - 

E a 

CD 

Q. 


03 

.co 

? -SS 
S^ 

S £ 

E o _ 
r v) ep 

•E CO CD CD 

r#c u E a> 

| S a | 

^ ao n 
■s a ■§ .-s 

I S^| 

.a S e <o 

"5 i? .o^ 
E S.-? o 

•® § •§ •■§■ 
e ‘co 
co 03 .E 
>- Q) m i2 

«il § 

■5 o g. 

_ o 7ò * 
'? -S S 

03 co O 

c -SS .° 

O Q> 
o 


§ a 

s .a .e § 

?-c Sa 

03 CO O a 
03 £: 

c * 

s. 


03 


O 

E 

03 


03 

E 

o 


co 03 
N x - 
.N Q. 

ÌB E 
E 3) 
a E 

Se 

J? o 
o ^ 

o 

CO CL 
03 ^ 

E 

03 


oc 

Uj 

Q 


S 

e 

03 


.co 

CO 

03 


tr 

3 -i 

03 p 
-J Uj 

o 


■§ 

■§ 

o 

E 

.e 

_co 


3 

O 

63 


cr 03 
.d s 
-q *o 

E co 
co o 

H— 

e 

03 

e 03 
co -e 

5. o 


co 

e 


o 

o 

o 

£ 


e 
co 

E 

*2 
•d 03 

03 

s °- 

s 

£ 


s 

e 

03 

E 

SS 

03 

e 

E 

o 

E 

S 

e 

o 

CJ 



Per averlo subito inviare L 22.000 (IVA compresa) più 
L. 1.500 (per spese postali) a mezzo vaglia postale o 
assegno bancario, indirizzandolo a TEXIM Italia S.r.l. - 
Via dell’Esperanto 71 - 00144 ROMA EUR 





IL SOFTWARE UTILE 


angw m 




|[|1! jjjfj 

Pii illlj ÌIÌ!::, ÌÌ : j 

:::::: ::::::: 

iiliiii ili jiiii 

Pii 

ii: 

lll!i!!ii!illp : .:jlil!r' ii 

. 

::::::: ::::::: 

l/l MOSTRIAMO COME IL / 

ftllllllillllllllr 

"iiliiii. il!!! .iiliiii' illlllll :! 


VOSTRO HOME-COMPUTER PUÒ / 

RIVELARSI UH FANTASTICO / 


iiìiiiill-'lliiiiilIP 1 iiliiii 

ii Ili iiliiii 

STRUMENTO MUSICALE / 


di P. Giancarini 


;jip|i!! iamo circondati di suoni, voci, ru- 
jifpj mori, musica. 

iiHiÉli La principale fonte di stress 
delle nostre giornate è forse l'inquina¬ 
mento acustico, in cui siamo immersi 
praticamente 24 ore su 24. 

D’altra parte, la musica scandisce i 
tempi della nostra vita in casa, in auto, 
nei locali pubblici. Probabilmente, sen¬ 
za che ce ne rendiamo conto, influisce 
persino sui nostri stati d’animo. Quanti 
di voi si trovano a canticchiare per tutto 
il giorno un motivetto, senza magari 
rendersi conto che è il primo motivetto 
che avete ascoltato alla radio, al vostro 
risveglio? 

Pochi di noi sono educati all'ascolto 
della musica. Ancora meno sono capa¬ 
ci di crearla, suonando qualche stru¬ 
mento, o addirittura comporla. 
L'educazione musicale è sempre stata 
un testo dolente dei curriculum delle 
scuole italiane. 

Le difficoltà intrinseche della materia, 
il lungo periodo di addestramento, la 
cronica scarsità di strumenti musicali 
ha sempre impedito la crescita della 
cultura musicale in Italia, che pure è 
tuttora considerata una delle patrie 
della bella musica. 

In questo articolo vi mostreremo che il 
vostro home-computer può rivelarsi un 
fantastico strumento musicale, facilis¬ 
simo da suonare. Anzi, più che uno 
strumento certi computer per quanto 
piccoli sono in realtà vere e proprie or¬ 
chestre, come vedremo. 

Non solo: un home-computer può di¬ 
ventare un pazientissimo e fantasioso 
istruttore, che vi insegnerà in maniera 
divertente i primi rudimenti della cultu¬ 
ra musicale. 

Questo è naturalmente soltanto un arti¬ 
colo introduttivo, ed inoltre come al so¬ 
lito prenderà in considerazione solo 
l’hardware ed il software esistente in 
commercio per un home-computer ben 
determinato: il nostro vecchio amico 
Commodore 64. E nel campo musicale 
questo software sta diventando davve¬ 


ro tanto e di ottima qualità, forse più di 
quello per la grafica. 

Non se ne dolgano i tantissimi lettori di 
LIST possessori di altre marche: si ac¬ 
corgeranno che ciò che diremo sarà 
utilissimo anche per loro. 

Chi comunque vuole davvero approfon¬ 
dire questo originale aspetto delle ca¬ 
pacità degli home-computer troverà al¬ 
la fine una breve bibliografia. 

Un po’ di teoria 

Il suono è un fenomeno fisico prodotto 
dalle vibrazioni di un oggetto, che si 
propagano nell'aria e vengono «cattu¬ 
rate» dal nostro orecchio. 

Nel nostro caso, il C64 genera impulsi 
elettrici, che arrivano all'altoparlante 
del televisore o monitor, e vengono tra¬ 
sformati in vibrazioni. 

Qui non ci interessa affatto come ciò 
avvenga fisicamente: il punto è che il 
C64 può generare suoni e rumori. Ci 
occorre dunque sapere qualche cosa 
di più sulle caratteristiche fisiche dei 
suoni. 

I caratteri distintivi del suono sono 4: 

1 - FREQUENZA (o altezza) 

È il numero di vibrazioni registrabili 
nell'aria in un secondo. Si misura in 
hertz: i suoni avvertibili dall'orecchio 
umano variano tra i 16 (suoni molto 
bassi) e i 20.000 hertz (suoni molto acu¬ 
ti). In musica non si usano tutte le fre¬ 
quenze possibili: quelle permesse si 
chiamano note musicali. 



Pochissimi strumenti sono in grado di 
riprodurre tutte le frequenze musicali. 
In tabella vedete le frequenze espresse 
in hertz riproducibili col C64. Ogni co¬ 
lonna è un ottava, e contiene 12 fre¬ 
quenze che vanno sotto il nome di note 
temperate. Di queste, 7 sono dette fre¬ 
quenze naturali (DO RE MI FA SOL LA 
SI DO) e corrispondono ai tasti bianchi 
del pianoforte. Le altre si dicono fre¬ 
quenze alterate e sono contraddistinte 
dal segno (diesis). 

2-TIMBRO (ocolore) 

È quel carattere del suono che permet¬ 
te di distinguere il DO di un violino da 
quello di una tromba. Anche se sono 
suoni della stessa frequenza, hanno un 
«colore» ben diverso. 

Uno dei parametri che influenzano il 
timbro è la forma d'onda. Il suono può 


TABELLA DELLE FREQUENZE DELLE NOTE IN HERTZ 


do 

16.35 

32.70 

65.40 

130.8 

261.6 

523.2 

1046 

2093 

4186 

8372 

do# 

17.32 

34.64 

69.29 

138.6 

277.2 

554.4 

1108 

2217 

4434 

8869 

re 

18.35 

36.70 

73.41 

146.8 

293.6 

587.3 

1175 

2350 

4699 

9398 

re# 

19.44 

38.89 

77.78 

155.5 

311.1 

622.2 

1244 

2489 

4978 

9956 

mi 

20.60 

41.20 

82.40 

164.5 

329.6 

659.2 

1318 

2637 

5274 

10548 

fa 

21.82 

43.65 

87.30 

174.7 

349.2 

698.5 

1396 

2793 

5587 

11175 

fa# 

23.12 

46.24 

92.50 

185.0 

370.0 

740.0 

1480 

2960 

5920 

11840 

sol 

24.50 

49.00 

98.00 

196.0 

392.0 

784.0 

1568 

3136 

6272 

12544 

sol# 

25.95 

51.91 

103.82 

207.6 

415.3 

830.6 

1661 

3322 

6644 

13289 

la 

27.50 

55.00 

110.00 

220.0 

440.0 

880.0 

1760 

3520 

7040 

14080 

la# 

29.13 

58.27 

116.54 

233.1 

466.2 

932.3 

1864 

3729 

7458 

14917 

si 

30.86 

61.73 

123.47 

246.9 

493.8 

987.7 

1975 

3951 

7902 

15804 
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essere rappresentato graficamente: 
nella figura vedete le quattro principali 
forme d'onda ottenibili col C64. A cia¬ 
scuna forma d’onda (o combinazione di 
esse) corrisponde un ben preciso stru¬ 
mento musicale classico: 



3- INTENSITÀ 

Distingue un suono forte da un suono 
debole. Nella vita di tutti i giorni lo chia¬ 
miamo VOLUME. 

4- INVILUPPO 

Questo quarto carattere ha a che fare 
con l'evolversi nel tempo del suono 
(durata); inoltre è in stretta relazione 
anche con l’intensità ed il timbro. 

La generazione di un suono, sia essa 
ottenuta in modo tradizionale o elettro¬ 
nico, è decomponibile in 4 diverse fasi: 

a. attacco (ATTACK) 

b. decadimento (DECAY) 

c. sostegno (SUSTAIN) 

d. rilascio (RELEASE) 

Nella figura, tratta dal programma 
«<3001: a Sound Odyssey», vedete sche¬ 
matizzato il succedersi delle quattro fa¬ 
si (riassunte nella sigla ADSR, ottenuta 
prendendo le loro iniziali): 







Produrre musica con un computer, e 
quindi col C64, significa dunque poter 
agire su queste 4 variabili nelle più di¬ 
verse combinazioni. Il computer diven¬ 
ta uno strumento musicale elettronico 
che pilota un altoparlante. Il C64 non 
produce musica stereo. 

I linguaggi 

Quasi tutti i linguaggi implementati su 
C64 presentano un piccolo set di istru¬ 
zioni adatte a governare le funzioni 
musicali. 

In BASIC suonare significa scrivere 
una serie di POKE (PEEK non si può 
usare perché i registri del chip sonoro 
sono «write only»). 

Per esempio: 

5 M = 54272: REM indirizzo iniziale del¬ 
la pagina suono 

10 POKE M + 24,15:POKE M,214:POKE 
M +1,28 

20 POKE M + 5,160:POKE M + 
6,250/POKE M + 4,33 
è un programma che vi permette di ge¬ 
nerare la nota LA. Per un approfondi¬ 
mento vi rimandiamo al libro di F. Fab¬ 
bri. 


Nel SIMONS BASIC esistono invece 
una serie di comandi che rendono mol¬ 
to più semplice la costruzione di «spar¬ 
titi software», cioè programmi che suo¬ 
nano musica: 

WAVEv.b 

seleziona la voce (una delle tre) ed il ti¬ 
po di suono (forma d’onda) 
ENVELOPEDE v, a, d, s, r 
per assegnare i parametri ADSR alla 
voce v 
MUSIC n,s 

suona la sequenza di note contenuta in 
s (notazione inglese: C, D, E. F, G, A, B) 
con durata di battuta n. 

È chiaro comunque che comporre mu¬ 
sica in questo modo significa avere pri¬ 
ma di tutto notevoli competenze infor¬ 
matiche, tutto a scapito della semplici¬ 
tà d’uso. 

Infine, un linguaggio BASIC-like spe¬ 
cializzato solo per la musica è "Synty 
64”, della ABACUS. 

I programmi 

Il software musicale già pronto, invece, 
rende molto più semplice sfruttare le 
notevoli potenzialità del vostro compu¬ 
ter. I programmi sono essenzialmente 
di tre tipi: 

— musiche già pronte, con grafica o 
meno: il C64 diventa un riproduttore 
musicale con possibilità grafiche (e 
quando sarà possibile interfacciarlo 
con le unità Compact Disc non ci sa¬ 
ranno limiti alla fantasia). 



CAP,, 
■ CAP,* 
- CAP„. 
-CAP,* 


-EXT IN 


Schema a blocchi del chip musicale del C64 
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— sintetizzatori 

— sequncer 

Un SINTETIZZATORE (synthesizer) è 
uno strumento hardware che genera 
suoni elettronicamente. I suoni riprodu¬ 
cibili coprono una gamma molto vasta: 
un sintetizzatore può simulare moltissi¬ 
mi strumenti musicali diversi. 

Il C64 contiene un processore (SID 
6581) che è un sintetizzatore non trop¬ 
po sofisticato, in confronto a certi com¬ 
puter specializzati. 

Se è di semplice concezione, è d'altra 
parte completamente programmabile. 
Schema a blocchi 
del chip musicale del C64 

Un programma che pilota questo chip, 
permettendo di usarlo facilmente, si 
chiama anch'esso sintetizzatore. Di soli¬ 
to la tastiera viene trasformata in tastiera 
musicale. Altri programmi invece richie¬ 
dono l'uso di speciale supporto hardware. 




Un sintonizzatore contiene due o più 
OSCILLATORI. Sono gli oscillatori 
che generano i segnali di frequenza 
che verranno trasformati in suoni. 
Ogni oscillatore contiene un proprio 
generatore di inviluppo. Il C64 contie¬ 
ne 3 oscillatori, ovvero può riprodurre 
fino a tre voci contemporaneamente 
(suono polifonico): il numero minimo 
ottimale sarebbe 4. Questo significa 
che col C64 abbiamo alcune limitazio¬ 
ni. 

È possibile modificare il suono gene¬ 
rato da un oscillatore tramite i FILTRI. 
Il C64 ne possiede di 3 tipi: 


— passabanda: lascia passare solo le 
frequenze vicine ad una determinata, 
detta frequenza di taglio (cutoff) 

— passabasso: lascia passare solo le 
frequenze inferiori a quella di taglio 

— passaalto: lascia passare solo le 
frequenze superiori. 


Un programma sintetizzatore vi per¬ 
mette di agire su tutti questi dispositivi. 
Un Editor Musicale (o sequencer) è inve¬ 
ce un programma che permette di crea¬ 
re, modificare, memorizzare, riprodurre 
musica. Anche qui la tastiera diventa una 
tastiera musicale (ma certi programmi 
permettono anche l’uso del joystick). 

Il software commerciale 
Music Construction Set (Electronic Arts) 
Uno dei primi veri editor musicali. È 
fornito di circa 15 pezzi già pronti. Per 
editare pezzi nuovi si usa il joystick, il 
che rende un po' pesante la fase di 
scrittura delle note. Può stamapare gli 
spartiti musicali, ma solo su stampante 
MPS801 o compatibili. 



Synthesound (Human Engeenered Sof¬ 
tware) 

Un programma sintetizzatore. È piutto¬ 
sto vecchio (1983), e di uso complesso, 
ma molto completo. 

Master Composer (Access Software) 

Un sintetizzatore-sequencer integrato, 
con moltissime musiche già pronte. 



Music Shop 

Altro editor musicale con ottima grafica. 
Interessante l'uso delle finestre video, 
che richiama il software Macintosh. 



Kawasaki (Sight and Sound) 

Vero e proprio sintetizzatore-sequen¬ 
cer, specializzato in musica rock. La 
caratteristica più appariscente è la gra¬ 
fica, che è eccezionale e sincronizzabi¬ 
le con la musica. È composto da più di¬ 
schetti. 



28 


LIST 10/11 

















































































Musicale (Waveform Corporation) 

Molto complesso e completo. È costi¬ 
tuito da 5 dischetti: sintetizzatore, se- 
quencer, moltissime scale cromatiche 
già predisposte. Ad esempio: 
blues, araba, giapponese, balinese, 
ebraica, indù, barocca, rock, egizia, li¬ 
dia, orientale, elolica, ionica... 
e decine di altre. Contiene anche un 
programma di autoapprendimento (tu- 
torial). 


studio della teoria musicale. 

È composto da una succinta ma sugge¬ 
stiva introduzione alla creazione di mu¬ 
sica elettronica, da alcuni pezzi dimo¬ 
strativi e da un sintetizzatore. Molte 
delle figure di questo articolo sono trat¬ 
te da questo programma. 



7 Note Bit (Jackson-SI.EL.) 

Il primo tentativo serio in Italia di utiliz¬ 
zare un computer per la didattica musi¬ 
cale. È costituito da 14 nastri ampia¬ 
mente corredati da istruzioni e notizie. 
Uno strumento eccellente per la didatti¬ 
ca: ci sono moltissimi esercizi da svol¬ 
gere. 




La sintesi vocale 

Il C64 può riprodurre non solo suoni e 
rumori, ma persino la voce umana. A 
noi risulta l’esistenza di un solo pro¬ 
gramma, ormai molto famoso, che si 
chiama S.A.M. (Software Automatic 
Mouth, Bocca Automatica Software). 

In realtà SAM può essere considerato 
un'estensione del BASIC, cui aggiunge 
i seguenti comandi: 

SAY «stringa» 

che ordina di pronunciare le parole 
contenute in «stringa» 

SPEEDn 

che determina la velocità del discorso 
SAM 

modo fonetico: le parole non sono scrit¬ 
te normalmente, ma in una specie di 
grafia fonetica. 

Esempio: 

MY NAME IS SAM diventa MAY4 NEYM 

IHZ SAE4M 

RECITER 

modo inglese: le parole si scrivono 
normalmente, e la pronuncia è all'in¬ 
glese. 

KNOBSn.m 

per cambiare il timbro di voce 
SAM va usato per produrre programmi 
con output vocale: ad esempio una 
tombola elettronica. 



A Space Odyssey 

Un pacchetto motlo interessante per lo 



Bibliografia 
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PARTE OTTAVA 


SCUOLA E COMPUTER 



di F. Palomba e E. Cavallari 


ilgjjjpa alcuni anni lavoriamo nella 
jjlHj; scuola dell'obbligo usando il LO- 
jllìjfjjj GO. Su questo linguaggio esiste 
ormai un'ampia documentazione an¬ 
che in lingua italiana; ciò nonostante 
permangono ancora in alcuni ambienti 
pregiudizi ed equivoci, che si manife¬ 
stano con critiche di vario tipo, anche 
su riviste autorevoli. 

È stato detto che LOGO serve solo a fa¬ 
re fiori e quadrati; al massimo qualche 
triangolo. Qualcuno ha detto che è nè 
più né meno che un gioco, e pertanto 
(sic!) a scuola non può servire a nulla. 


C'è poi chi dice che è troppo facile, una 
cosa da bambini con cui non si può pro¬ 
durre nulla, e chi dice che al di là di 
quanto promette è invece molto diffici¬ 
le. 

Per tutte valga l'affermazione che si fa 
sul testo ««Insegnante e calcolatore», 
edito da Supernova - Milano, il quale li¬ 
quidando il LOGO in tredici righe ne di¬ 
ce quanto segue: «... la sua apparente 
semplicità nei comandi non è in grado 
di modificare la reale difficoltà concet¬ 
tuale della programmazione, e c’è da 
domandarsi se il BASIC o il Pascal non 


siano più «onesti» nel mostrare con 
evidenza problemi e difficoltà dei pro¬ 
cessi mentali associati». Ci conforta 
peraltro quanto scrive Tommaso Russo 
sul numero zero (del febbraio 85) della 
rivista Proxima di Trieste nell'articolo 
«LOGO un linguaggio per apprendere»; 
«Per chi non ne avesse mai sentito par¬ 
lare, sarà sufficiente dire che è un lin¬ 
guaggio di programmazione talmente 
sofisticato e potente da rendere possi¬ 
bile la programmazione anche a bam¬ 
bini che non sanno ancora leggere né 
scrivere. Per chi ne ha già sentito par- 


jjjjjjpjj uscito il numero zero de «La 
jjlpTartaruga», rivista di informati- 
iiilHiiica per la scuola dell'obbligo a 
cura del COGI (Centro di Orientamen¬ 
to Giovani) di Milano, edita da 
J.N./Emme edizioni. La rivista, che 
vuole essere uno strumento di lavoro 
per gli insegnanti, è bimestrale e vie¬ 
ne distribuita su tutto il territorio na¬ 
zionale nelle librerie e nelle principa¬ 


li edicole, oltre che in abbonamento. 
Nasce come coronamento del proget¬ 
to LUCAS, che ha interessato nume¬ 
rose scuole di Milano, e si avvale del¬ 
la collaborazione del comitato scien¬ 
tifico dello stesso progetto, composto 
fra gli altri da Giorgio De Michelis, 
Giancarlo Mauri, e Mariola Alberti 
dell’Istituto di Cibernetica di Milano, 
Giovanni Lariccia della Sisco di Ro¬ 


ma, Antonella Carassa del Politecni¬ 
co di Milano, con il coordinamento di 
Maria Rosa Confalonieri. 

Nel numero zero appaiono tra l'altro 
una intervista a Seymour Papert, una 
relazione di Marta De Vita su informa¬ 
tica, processi formativi e scuola, una 
relazione di Giovanni Lariccia sul 
progetto LUCAS. 
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lare, sarà meglio dire cosa il LOGO non 
è, per correggere un'idea sbagliata che 
potrebbe essersi fatto, soprattutto da 
alcuni servizi della RAI-TV che ne han¬ 
no parlato. Il LOGO non è un «linguag¬ 
gio per bambini»: non più, almeno, di 
quanto non lo sia l’italiano: un linguag¬ 
gio in cui è possibile scrivere un tratta¬ 
to di relatività generale, tradurre tutte 
le opere di Shakespeare, e, per un 
bambino di tre anni, chiedere «per¬ 
ché?». Naturalmente siamo d'accordo, 
come lo siamo con Giovanni Lariccia 
che, su MC Microcomputer (n. 18 - apri¬ 


La prima serie di procedure, MORSE 
etc., è tratta dal libro ALI PER LA 
MENTE (di H. Reggini, Ed. Elettroni¬ 
che Mondadori), un manuale utilissi¬ 
mo per chi voglia imparare a pro¬ 
grammare in LOGO. L’abbiamo leg¬ 
germente modificata per farla funzio¬ 
nare meglio su Commodore 64. Tra¬ 
duce frasi in linguaggio Morse (sono¬ 
ro e grafico). 

Per ottenere l’esecuzione basta digi¬ 
tare TRASMETTI seguito da una frase 
racchiusa in parentesi quadre e bat¬ 
tere Return. 

Il segno — è stato ottenuto con SHIF- 
T-R. 

La procedura MORSE trasforma una 
lettera in una successione di segnali 
grafici e acustici. Provate con MORSE 
"F o altre lettere. La procedura TRA¬ 
DUCI trasforma una parola negli stessi 
segnali, a partire dalla prima fino al¬ 
l’ultima lettera. La procedura TRA¬ 
SMETTI fa la stessa cosa con una fra¬ 
se, dalla prima all’ultima parola. Per 
fare questo la procedura TRASMETTI 
richiama TRADUCI, e quest’ultima ri¬ 
chiama MORSE, la quale richiama di 
volta in volta le procedure .e —. 

PER — 

SCRIVI 

SUONA I36R II 4 2 I 
FINE 

PER. 

SCRIVI 

SUONA I36R II 121 
FINE 

PER ASPETTA :N 

RIPETI :N 11 
FINE 

PER TRASMETTI :FRASE 
SE VUOTO? :FRASE STOP 


le 1983) afferma: «... il pregio maggiore 
del LOGO è quello di... scomparire di 
fronte ai problemi. Intendiamo dire 
che, una volta creato uno spazio di pro¬ 
blemi, ovvero un sistema di oggetti e di 
azioni per manipolarli, il LOGO si ridu¬ 
ce a pochissime parole chiave: le paro¬ 
le fondamentali per eseguire le azioni 
sono ormai parole derivate dal LOGO. 
Il pensiero si concentra cosi sulla co¬ 
struzione degli oggetti e non sulle tec¬ 
niche per padroneggiare gli strumenti. 
Dedicheremo periodicamente un certo 
spazio alla pubblicazione e al com¬ 


TRADUCI PRI :FRASE 

RIPETI 2 [ SCRIVI CARATTERE 32 ] 

ASPETTA 10 

TRASMETTI MENPRI :FRASE 
FINE . • 

PER TRADUCI :PAROLA 
SE VUOTO? :PAROLA STOP 
MORSE PRI :PAROLA 
SCRIVI CARATTERE 32 
TRADUCI MENPRI PAROLA 
FINE 

PER MORSE :L 

SE :L = "A ESEGUI I. — ] 

SE :L - "B ESEGUI [ — .. .] 

SE :L = ’ C ESEGUI [ — . — 


SE :L = ’Z ESEGUI [-..] 

FINE 

La serie di procedure GRAFICO, fat¬ 
ta da noi, è semplicissima e serve 
per disegnare istogrammi. La «su- 
perprocedura» è GRAFICO; essa 
chiama ASSI (LINEETTA è richiama¬ 
ta da ASSI), richiede poi quali valori 
mettere nel grafico (non dare valori 
superiori a circa 160), e infine chia¬ 
ma ISTOGRAMMA, che in modo ri¬ 
corsivo mette nel grafico tutti i valo¬ 
ri. 


PER GRAFICO 
ASSI 

STAMPAI QUALI VALORI 
(MAX 15) NEL GRAFICO?! 
AS "VALORI LR 
ISTOGRAMMA :VALORI 
FINE 


PER ASSI 

DISCHERMO PULISCITESTO TANA 
PS NT SU 


mento di procedure in LOGO, fatte da 
noi, trovate in letteratura, elaborate da 
ragazzi di scuola elementare, media, 
superiore, o istituti universitari. I lettori 
potranno valutare la complessità delle 
procedure, proporzionale alf’età e al li¬ 
vello di alfabetizzazione informatica 
degli autori. 


In questo numero diamo alcune proce¬ 
dure LOGO per Commodore 64. Né fiori 
né quadrati. 


INDIETRO 50 GIU 

VAX 150 VAX-150 

RIPETI 8 I AVANTI 20 LINEETTA I 

INDIETRO 160 

FINE 

PER ISTOGRAMMA :LISTA 
SE VUOTO? :LISTA STOP 
AS "P PRI :LISTA 
VAX XCOR + 10 

AVANTI :P 
VAX XCOR + 10 
INDIETRO :P 

ISTOGRAMMA MENPRI :LISTA 
FINE 

PER LINEETTA 
DESTRA 90 
AVANTI 2 
INDIETRO 4 
AVANTI 2 
SINISTRA 90 
FINE 

La procedura PESOFORMA calcola 
quale dovrebbe essere il peso di una 
persona in funzione dell'altezza, se¬ 
condo la formula peso = (altezza * 3 
- 250) : 4. Una sua traduzione in BA¬ 
SIC sarebbe immediata 

PER PESOFORMA 
TESCHERMO PULISCITESTO 
STAMPA I LA TUA ALTEZZA IN CM? I 
AS "ALTEZZA PRI LR 
AS "PESOFORMA (:ALTEZZA * 3 - 
250)/4 

STAMPA I IL TUO PESO IN KG. SE È 
LECITO? I 
AS "PESO PRI LR 

SE : PESO = : PESOFORMA STAMPA I 
SEI PERFETTO! I STOP 
SE : PESO > PESOFORMA STAMPA 
FRASE FRASE I DEVI PERDERE I 
(:PESO-:PESOFORMA) "CHILI STOP 
STAMPA FR FR I DEVI ACQUISTARE I 
(:PESOFORMA-:PESO) "CHILI 
FINE 
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ISPEAK LOGO 



a cura di Paolo Ciancarini 


jjjjjpjj n pratica siamo ora in possesso 
lllplildel vocabolario di base del lin- 
Éiiliiii! guaggio LOGO: ma ciò non signi¬ 
fica certo che sappiamo «parlare» in 
LOGO. 

Infatti, imparare un linguaggio di pro¬ 
grammazione non significa compren¬ 
dere le 50 o 100 parole primitive che lo 
costituiscono, quanto piuttosto saperle 
mettere insieme per produrre «discorsi 
sensati»: nel nostro caso, discorrere si¬ 
gnifica ovviamente saper produrre pro¬ 
grammi in LOGO. 

Non vogliamo certo spaventarvi: del re¬ 
sto vi sarete già accorti che imparare a 
programmare, soprattutto in LOGO, è 
facile; quello che resta difficile è acqui¬ 
sire una abilità molto più astratta e im¬ 
portante: imparare a ragionare. Ma 
siamo fortunati: si può dire che il LO¬ 
GO, come linguaggio, è nato più come 
strumento per imparare spontanea¬ 
mente a ragionare «informaticamen¬ 
te», che non per programmare. 


In fondo, infatti, per programmare il 
BASIC va benissimo, se lo conoscete 
bene e se sapete «ragionare» in BA¬ 
SIC. 

Supponiamo di voler usare il nostro 
computer per costruire un cartone ani¬ 
mato. Abbiamo studiato un po' di LO¬ 
GO, e sappiamo qualche cosa sulle 
possibilità grafiche del C64: per esem¬ 
pio, che esistono i folletti. Ma come fac¬ 
ciamo a passare dall’idea — visualiz¬ 
zare sul video un cartone animato tutto 
nostro — al programma che la realiz¬ 
za? 

Questo è il problema tipico che affronta 
chi deve programmare un computer 
per risolvere un problema. La progetta¬ 
zione di un programma è un'attività 
molto creativa e poco soggetta a rego¬ 
le: uno scienziato molto famoso intitolò 
un libro che è ormai la Bibbia dell'in¬ 
formatica in questo modo: «L’arte della 
programmazione dei computer», pro¬ 
prio a sottolineare il ruolo fondamenta¬ 


le che giocano l’immaginazione e la 
fantasia in questa attività che potrebbe 
sembrare molto astratta e fredda. 


La progettazione di un programma è 
una attività che si può scomporre in più 
fasi di lavoro. Nella maggior parte dei 
casi le prime fasi si svolgono lontano 
dal computer. Per esempio, nel caso 
della fiaba, dovremo portare a termine 
le seguenti fasi: 

— immaginare una trama 

— decidere la sceneggiatura: quante e 
quali scene, quanti e quali personaggi, 
ecc. 

— disegnare su carta le scene e i per¬ 
sonaggi 

— decidere le eventuali didascalie di 
accompagnamento e spiegazione 


Tutto questo fa parte di un momento 
molto importante nella «vita» dei pro- 
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grammi, che serve a specificare com¬ 
pletamente ciò che si ««vuole»» dal pro¬ 
gramma. In pratica in questa fase si 
cerca di definire con precisione cosa si 
pretende dal programma finale. 

Solo a questo punto si passa a proget¬ 
tare il programma vero e proprio. 

La teoria della programmazione ha in¬ 
dividuato tre metodologie fondamentali 
di progettazione e sviluppo di un pro¬ 
gramma — ma ciò non vale solo in in¬ 
formatica: moltissime attività umane 
possono essere classificate in uno di 
questi tre modi: 

a. Procedure dall’alto (top-down): 
nel caso della fiaba, si tratta di scrivere 
per prima la procedura fondamentale. 
Supponendo di aver specificato 4 sce¬ 
ne. intervallate da alcune didascalie di 
spiegazione, scriveremo per esempio: 

PER FIABA 

DIDASCALIA.INTRODUTTIVA 

SCENA.1 

DIDASCALIA.1 

SCENA.2 

SCENA.3 

DIDASCALIA.2 

SCENA.4 

SCENA.FINALE 

FINE 

dopodiché passeremo a definire le pro¬ 
cedure interne a FIABA. 

Ad esempio, se nella prima scena ci 
servisse un castello, un giardino e due 
personaggi: 

PER SCENA.1 
CASTELLO 
GIARDINO 
DISPONI :RE 
DISPONI PRINCIPESSA 
AZIONE 

FINE 

In pratica con questo metodo si defini¬ 
scono prima gli obiettivi globali (le 
strategie), che vengono scomposti in 
sottoobiettivi più semplici: dopodiché si 
passa a questi, ««raffinando» sempre di 
più il programma. È lo stesso sistema 
con cui a scuola insegnano a comporre 
i temi d'italiano: un buon tema dovreb¬ 
be essere progettato, ne più ne meno 
come un buon programma LOGO: 

— introduzione 

— svolgimento: 

— PUNTO 1 
— PUNTO 2 
— PUNTO 3 

— finale 

Un altro esempio potrebbe essere co¬ 
stituito dall'attività di un automobilista 


che deve guidare da Roma a Milano: 

— andare da Roma a Firenze: 

— andare sul Grande Raccordo Anula¬ 
re 

— prendere l’Autostrada del Sole 

— andare da Firenze a Bologna 

— evitare di entrare a Firenze 

— uscire a Bologna per mangiare 

— andare da Bologna a Milano 

— rientrare sull’autostrada 

— uscire all’ultimo casello 

— prendere la Tangenziale 

Ciascuna delle sottoattività dovrebbe a 
sua volta essere ulteriormente specifi¬ 
cata, fino a raggiungere un grado mas¬ 
simo di semplicità nelle azioni da com¬ 
piere. 

b. Procedure dal basso (bottom-up) 
Supponete, dopo aver definito SCE¬ 
NA.1, di ricordare che, da qualche par¬ 
te, avete memorizzata una procedura 
che disegna una CASA. Se la usate al 
posto del CASTELLO, evitate di dover 
programmare la relativa procedura: un 
bel risparmio! 

È un po' la tecnica di chi ha l’hobby del 
bricolage. Quando si decide di costrui¬ 
re qualcosa da sé, ci si accontenta de¬ 
gli strumenti e del materiale che si han¬ 
no a disposizione, per risparmiare tem¬ 
po e denaro. 

Nel nostro caso, vuol dire che cerche¬ 
remo di utilizzare tecniche e pezzi di 
programma già pronti, invece di stu¬ 
diarne di nuovi. Questo è uno degli usi 
più importanti della libreria di pro¬ 
grammi che vi abbiamo insegnato a co¬ 
struire nel numero scorso. 

In questo modo si affretta la costruzio¬ 
ne del programma, anche se un po’ a 
scapito del progetto iniziale. 

c. Procedere oscillando 

Nella realtà, naturalmente, non viene 
seguito nessuno dei due metodi, cosi 
opposti di cui sopra. 

Per fare un paragone, programmare 
esclusivamente top-down sarebbe co¬ 
me se già all’inizio di una partita di 
scacchi, uno avesse in testa solo l’o¬ 
biettivo di dare scacco matto. Inversa¬ 
mente, il comportamento bottom-up si¬ 
gnificherebbe giocare cercando sem¬ 
plicemente di porre all'avversario pic¬ 
cole trappole, senza mai considerare 
globalmente una strategia di gioco che 
porti ad un attacco decisivo. 

Giocare a scacchi significa invece sa¬ 
per dosare bene l'alternanza di pensie¬ 
ro strategico e tattico. 

Analogamente, il corretto processo di 
programmazione consisterà nel passa¬ 
re continuamente dalla definizione di 
obiettivi (superprocedure) alla soluzio¬ 
ne di problemi singoli (procedure di ba¬ 
se). 


I folletti 

Se vogliamo costruire animazioni, ab¬ 
biamo bisogno di familiarizzare con 
una delle caratteristiche più divertenti 
della grafica del C64: i folletti (sprite). 
Cosa sono i folletti? In realtà voi ne co¬ 
noscete già uno: la Tartaruga. Per ren¬ 
detene conto, procedete cosi: 

— prendete il disco delle utilità del 
C64 e inseritelo nell’unità a dischi 

— scrivete RECUPERA "EDFOL 

— finito il caricamento, invocate la 
procedura DESFOR (DEScrizione delle 
FORme). 

A questo punto apparirà ciò che vedete 
nella figura 



La grossa griglia a sinistra é l'editor 
delle forme dei folletti (in questo mo¬ 
mento come vedete contiene la defini¬ 
zione della Tartaruga). 

Avete una serie di comandi che vi per¬ 
mettono di definire qualsiasi forma vi 
sembri opportuna. 

Le operazioni permesse sono: 

— spostarsi sulla griglia, con i tasti 
cursore (in basso a destra sulla tastie¬ 
ra) ed il tasto ««RETURN» 

— riempire un quadretto, con il tasto 
««*»> o «« + »»: il primo poi sposta a destra 
il cursore, mentre il secondo lo lascia 
dov'è 

— cancellare un quadretto, con la bar¬ 
ra spaziatrice oppure il tasto ««->» oppu¬ 
re il tasto«DEL>» (in alto a destra sulla 
tastiera) 

— cancellare TUTTA la griglia premen¬ 
do «SHIFT» e «CLR» contemporanea¬ 
mente 

— cambiare le dimensioni del folletto: 
battendo X si cambia la larghezza; con 
Y si cambia l'altezza 

— ottenere il negativo del folletto; se 
pigiate ««CTRL» e. tenendolo premuto, 
battete «8», ottenete la forma del follet¬ 
to in negativo: i quadretti piani si vuota¬ 
no e i pieni si riempiono. 

Definita la forma voluta, uscite dall’edi- 
tor delle forme battendo istruzioni che 
davate alla Tartaruga: AVANTI, DE¬ 
STRA, ecc. 

Notate però che quando ordinate di gi¬ 
rare a destra o a sinistra, mentre la 
Tartaruga gira effettivamente la testa, i 
folletti non si comportano cosi. Restano 
fissi, e dimostrano di «aver capito» solo 
con un successivo comando AVANTI o 
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INDIETRO, perché si spostano nella 
nuova direzione. 

Potete avere sullo schermo grafico fino 
a 8 folletti contemporaneamente. Ogni 
folletto ha un numero compreso tra 0 e 
7. Il folletto 0 è di norma la Tartaruga. 
Quindi per cambiare la forma di un al¬ 
tro folletto scrivete 
AVVERTI 1 MOSTARTA 
Poi invocate DESFOR, e definite la for¬ 
ma del folletto numero 1, senza toccare 
la Tartaruga. 

L’istruzione AVVERTI serve anche nel¬ 
le procedure per «svegliare» i folletti: 

PER MUOVI.INSIEME :F1 :F2 
AVVERTI :F1 MOSTARTA A 3 
AVVERTI :F2 MOSTARTA A 3 
FINE 

MUOVI.INSIEME 0 1 

In questo modo sembrerà che i due fol¬ 
letti si muovano simultaneamente. No¬ 
tate che, dopo la sveglia con AVVERTI, 
occorre comunque ordinare di compa¬ 
rire con MOSTARTA. 

Una complicazione nell'uso dei folletti 
del LOGO dei C64 sta nel dover ricor¬ 


dare quali sono le parole primitive che 
si rivolgono ai folletti, quali gli archivi 
di libreria, quali le procedure. Spero 
che il seguente specchietto vi sia d’aiu¬ 
to: 

PAROLE PRIMITIVE: 

AVVERTI n cambia il folletto attivo 
CHI non ha argomenti: restituisce il nu¬ 
mero del folletto attivo 
FORMA non ha argomenti: restituisce il 
numero di forma del folletto attivo. In¬ 
fatti un folletto può assumere tempo¬ 
raneamente, grazie all’istruzione 
PORTA, la forma di un altro folletto. 
PORTA n assegna al folletto attualmen¬ 
te attivo («sveglio») la forma del folletto 
n. 

ARCHIVI DI LIBRERIA D’UTILITÀ 

FOLLETTI contiene le procedure per 
usare gli sprite 

EDFOL contiene tutte le procedure di 
folletti, più le procedure di definizione 
delle forme 

VELOCITÀ contiene alcune procedure 
per dare una velocità inerziale ai follet¬ 
ti (cioè per tenerli in movimento sen¬ 


za dargli ordini continui). Ne riparlere¬ 
mo nel prossimo numero. 

PROCEDURE CONTENUTE 
IN FOLLETTI 

RECUPERAFORME per leggere archivi 
di forme dai dischetti 
CONSERVAFORME per salvare su di¬ 
sco archivi di forma. Le forme possono 
solo essere salvate (e recuperate) 8 al¬ 
la volta. 

CHIEDI per muovere facilmente i folletti 
TOCCA.BORDO? procedura che con¬ 
trolla se un folletto tocca una linea 
TOCCA.FOLLETTO? procedura che 
controlla se due folletti si toccano 
GRANDEX, GRANDEY, PICCOLOX, 
PICCOLOY per cambiare le dimensioni 
dei folletti 

PROCEDURE CONTENUTE 
IN EDFOL 

Tutte quelle in FOLLETTI, più: 
EDFOL e tutte quelle necessarie a 
creare le forme. 

Nel prossimo numero approfondi¬ 
remo questo discorso e vedremo 
alcuni esempi di programmi sofisti¬ 
cati. 


ANNUNCIO 

IMPORTANTE 

Annunciamo a tutti i lettori e a coloro che ci hanno sollecitato di 
favorire la pubblicazione su «LIST» di un metodo pratico 
per apprendere meglio l’uso del Computer che dal 
prossimo numero troveranno, spillata al centro 
della Rivista, la 1° dispensa del 

CORSO PRATICO 
per L’USO DEL 
COMPUTER 
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TURN BACKER MV-911 

Quando il robot si trova davanti ad 
un ostacolo gridare «Look out» e 
questo si girerà immediatamente a 
sinistra. 

- Movimento: 

3 gambe meccaniche per ogni lato 

- Alimentazione (non inclusa): 
batterie da 1.5 V «AA» x4 


LINE TRACER II MV-913 

Guidato da un sensore a raggi 
infrarossi questo robot segue 
qualsiasi linea nera tracciata su un 
foglio bianco. 

- Movimento: 

3 ruote guidate da 2 motori DC 

- Alimentazione (non inclusa): 

batterie da 1.5 V «AA» x 2 9V x < 


PEPPY MV-916 

Il robot PEPPY è provvisto di un 
sensore sensibile al suono e a 
quanto incontra sul suo cammino. 
Quando il sensore viene a contatto 
con un ostacolo o percepisce un 
rumore, come un battito di mani, 
automaticamnte il robot gira a sini¬ 
stra con un movimento compreso 
fra i 90° e i 180° 

Alimentazione (non inclusa): 
batterie da 1.5 V « AA» x 2 


MEMOCOM CRAWLER MV-918 

Questo robot è controllato da una 
memoria RAM 256 x 4 bit, 
mediante la tastiera inclusa nel kit 
e si muove in base ai comandi 
comunicati a questa ultima. Sulla 
tastiera vi sono 5 pulsanti che cor¬ 
rispondono ai seguenti movimenti: 
avanti, destra, sinistra, pausa, 
suono (ronzio), segnale luminoso. 

- Alimentazione (non inclusa): 
batterie da 1.5 V «AA» x 2 9V x < 



MR. BOOTSMAN MV-931 

MR. BOOTSMAN, l’insetto mec¬ 
canico: 2 velocità, scatola di con¬ 
trollo. MR. BOOTSMAN può cam¬ 
minare o correre in avanti e indie¬ 
tro, a sinistra e a destra: quando il 
movimento di tre delle sei zampe 
meccaniche viene cambiato nel¬ 
l’opposto, il robot può girarsi di 
360° 

Alimentazione (non inclusa): 

batterie da 1.5 V «AA» x 2 


NAVIUS MV-938 

NAVIUS è un robot controllato 
mediante dei dischetti program¬ 
mabili. È in grado di riconoscere il 
bianco e il nero del dischetto pro¬ 
grammato e quindi muoversi in 
avanti, a destra, a sinistra o fer¬ 
marsi. Il dischetto programmato 
può essere usato all’Infinito. È 
possibile programmare altri dischi 
in modo da far compiere a NAVIUS 
vari movimenti. 

- Alimentazione (non inclusa): 

batterie da 1.5 V «AA» x2 9V xl 



AVOIDER MV-912 

Un robot intelligente che percepi¬ 
sce gli ostacoli mediante un raggio 
infrarosso e li evita. 

- Movimento: 

3 gambe meccaniche per lato 

- Alimentazione (non inclusa): 

batterie da 1.5 V «AA» x 4 9V x < 


PIPER MOUSE MV-915 

Robot controllato da un sensore di 
suono Supersonico e da un cir¬ 
cuito elettronico. Usando un 
fischietto unito al kit PIPER 
MOUSE eseguirà immediata¬ 
mente i comandi comunicati: sini¬ 
stra, stop, destra, stop, avanti e 
stop. 

- Movimento: 

3 ruote guidate da 2 motori DC 

- Alimentazione (non inclusa): 
batterie da 1.5 V «AA» x2 9V xl 

SOUND SKIPPER MV-917 

Ordinare al robot di camminare 
dicendo ad alta voce «Walk» o 
battendo le mani: questo inizierà la 
sua «passeggiata» fermandosi poi 
da solo. 

- Movimento: 

2 gambe meccaniche 

- Alimentazione (non inclusa): 
batterie da 1.5 V«N» x2 


MONKEY MV-919 

Ordinare ad alta voce al robot di 
muoversi (MOVE) o battere le 
mani: MONKEY, lo scimmiotto, ini¬ 
zierà ad avanzare con le braccia 

- Movimento: 

2 braccia meccaniche 

- Alimentazione (non inclusa): 
batterie da 1.5V «N» x 2 


CIRCULAR MV-935 

CIRCULAR è provvisto di due 
grandi ruote che gli permettono di 
ruotare in avanti, a destra, a sini¬ 
stra e su se stesso. Tutti i movi¬ 
menti sono controllati mediante un 
comando a distanza. 

- Alimentazione (non inclusa): 
batterie da 1.5 V «AA» x 2 9V x < 


MEDUSA MV-939 

MEDUSA il robot dal cervello ele- 
tronico. Registrati i comandi, il 
robot inizierà a muoversi ferman¬ 
dosi automaticamente passato il 
tempo prestabilito. 

- Movimento: 

2 gambe meccaniche per lato 
Alimentazione (non inclusa): 

batterie da 1.5 V «N» x 2 
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HANOBOOK 



ARCHITETTURA 

DELLO 



PROSEGUE IN QUESTO NUMERO LA PUBBLICAZIONE DELLE ISTRUZIONI RIGUARDANTI 
IL LINGUAGGIO MACCHINA DEL PROCESSORE Z80. 

IN QUESTA SECONDA PARTE SONO 01 SCENA LE ISTRUZIONI ARITMETICHE 
E LOGICHE AD 8 BIT. 

NEL PROSSIMO NUMERO L UL TIMA SERIE 01 COMANDI UTILI 
PER GLI APPASSIONATI DEL L.M. 


PARTE SECONDA 



di Massimo Momo e Massimo Truscelli 


ISTRUZIONI ARITMETICHE E LOGICHE 

fiD 8 BIT 

flDC 

A.H 

140 


“ 

SBC 

fi, D 

154 



" 




flDC 

fi, L 

141 


- 

SBC 

A,E 

155 



» 

MNEMONICO 

CODICI OGGETTO 

FLflGS 

flDC 

fi, n 

206 

n 

- 

SBC 

fi, H 

156 



• 




flDC 

fl,<HL> 

142 


" 

SBC 

fi, L 

157 



•• 

HDD fi,fi 

135 

TUTTI 

flDC 

fi,<ix+d) 

221 

142 d 

" 

SBC 

fi, n 

222 

rt 


" 

HDD A, B 

123 

" 

flDC 

fi,(i»+d> 

253 

142 d 

- 

SBC 

fi,(HL) 

158 



« 

HDD A,C 

129 

" 

SUB 

fi 

151 


- 

SBC 

A.Cix+d) 

221 

158 

d 

•• 

HDD A,D 

130 

» 

SUB 

B 

144 


« 

SBC 

fi, <ia +d> 

253 

158 

d 

- 

HDD fi,E 

131 

■ 

SUB 

C 

145 


■ 

AND 

fi 

167 



- 

fiDD fi,H 

132 

11 

SUB 

D 

146 


- 

AND 

B 

160 



" 

HDD fl,L 

133 

" 

SUB 

E 

147 


" 

AND 

C 

161 



- 

fiDD A,n 

193 n 

“ 

SUB 

H 

148 


- 

AND 

D 

162 



" 

fiDD fi,< HL > 

134 

- 

SUB 

L 

149 


- 

AND 

E 

163 



■ 

fiDD fi,<ix+d> 

221 134 d 

- 

SUB 

n 

214 

n 

- 

AND 

H 

164 



» 

fiDD fi,<ia+d> 

253 134 d 

- 

SUB 

<HL> 

150 


- 

AND 

L 

165 



- 

flDC fi,fi 

143 

- 

SUB 

<lx*d> 

221 

150 d 

“ 

AND 

n 

230 

TI 


- 

fiDC fi, B 

136 

" 

SUB 

<i»+d> 

253 

150 d 

- 

AND 

<HL) 

166 



" 

flDC fi,C 

137 

- 

SBC 

fi.fi 

159 


- 

AND 

dx+d) 

221 

166 

d 

» 

flDC fi.D 

138 

- 

SBC 

fi, B 

152 


- 

AND 

<i»+d> 

253 

166 

d 

- 

flDC fi, E 

139 

- 

SBC 

fl,C 

153 


- 
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MNEMONICO 

CODICI 

OGGETTO 

FLflGS 

XOR L 

173 



- 

INC D 

20 



Il II 





XOR n 

238 

n 


» 

INC E 

28 



Il II 

OR FI 

183 


TUTTI 

XOR <HL> 

174 




INC H 

36 




OR B 

176 


II 

XOR <iy+d> 

221 

174 

d 

- 

INC L 

44 




OR C 

177 


•I 

XOR <iy+d> 

253 

174 

d 

- 

INC <HL> 

52 




or d 

178 


•1 

CP FI 

191 



■ 

INC <ix+d> 

221 

52 

d 

Il II 

OR E 

179 


I* 

CP B 

184 



•• 

INC <iy+d> 

253 

52 

d 

Il II 

OR H 

180 


“ 

CP C 

185 



- 

DEC fl 

61 



- - 

OR L 

181 


'• 

CP D 

186 



« 

DEC B 

5 



« .. 

OR r> 

246 

n 

II 

CP E 

187 



- 

DEC C 

13 



H H 

OR <HL> 

182 


M 

CP H 

188 



- 

DEC D 

21 




OR (ix+d) 

221 

182 d 

II 

CP L 

189 



» 

DEC E 

29 



„ M 

OR <iy+d) 

253 

182 d 

II 

CP n 

254 

n 


- 

DEC H 

37 




XOR FI 

175 


II 

CP (HL> 

190 



“ 

DEC L 

45 



- 

XOR B 

168 


II 

CP (lx+d> 

221 

190 

d 

« 

DEC <HL> 

53 




XOR C 

169 


" 

CP <ly+d> 

253 

190 

d 

“ 

DEC <ix+d) 

221 

53 

d 


XOR D 

170 


“ 

INC fl 

60 



S..Z,H,P/V,N 

DEC <iy+d> 

253 

53 

d 


XOR E 

171 


" 

INC B 

4 



« 






XOR H 

172 



INC C 

12 



.. » 
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LINGUAGGIO MACCHINA 



PROSEGUIAMO IL NOSTRO VIAGGIO NEI MEANDRI DEL MICROPROCESSORE Z-80. 

IN ONESTA CONTATA !NPARIAMO A SOMMARE 0 SOTTRARRE NUMERI DIVERSI DA 1. 


a cura di Massimo Momo 



jjpip el precedente articolo abbiamo 
jiKlp cominciato ad analizzare le istru- 
zioni aritmetiche di INCREMEN¬ 
TO e DECREMENTO di un registro o del 
contenuto di una cella di memoria, ed 
abbiamo visto come queste influenzino 
i bit di ZERO e di SEGNO contenuti nel 
registro FLAGS dello Z80. 

Naturalmente spesso si ha la necessità 
di sommare o sottrarre numeri diversi 
da uno; per sommare o sottrarre un ge¬ 
nerico numero n dall’Accumulatore vi 
sono le istruzioni; 

ADD A,n significato: 

A <-A+n 
SUB n significato: 

A <- A-n 

che si leggono; incrementa (o decre- 
menta) dal numero n (compreso tra 0 e 
255) il contenuto dell’Accumulatore. 

È possibile anche incrementare o de- 
crementare l'Accumulatore del numero 
contenuto in uno dei registri dello Z80 
con le istruzioni: 

ADD A,r significato: 

A <- A + r 
SUB r significato: 

A <-A-r 

dove r è uno qualsiasi dei registri A, B, 
C, D, E, H,L. 

Vi è anche la possibilità di sommare o 
sottrarre dall'Accumulatore il conte¬ 
nuto di una cella di memoria; a tale 
scopo è sufficiente caricare l’indirizzo 
della cella in oggetto nella coppia HL 
ed utilizzare le istruzioni: 

ADD A, (HL) significato: 

A < - A + (HL) 


SUB (HL) significato: 

A <- A-(HL) 

Per vedere come queste istruzioni agi¬ 
scono sui bit del registro FLAGS, cari¬ 
chiamo in memoria il programma VE- 
DIREGIS, che ormai dovreste conosce¬ 
re bene, e scriviamo la seguente serie 
di istruzioni: 

28000 128 ADD A,B 

28001 205 208 108 
CALL 27856 

Carichiamo in Accumulatore il valore 2 
e nel registro B il valore 20. Poniamo il 
Program Counter a 28000 e andiamo in 
esecuzione con «R». Dopo la somma 
vedremo che l’accumulatore contiene 
il valore 22. Riportiamo il Program 
Counter a 28000 (PC28000) e carichia¬ 
mo in B il valore 248; riandiamo quindi 
in esecuzione. Naturalmente ci si 
aspetterebbe di leggere in Accumu¬ 
latore il valore 270 (22 + 248), ma poi¬ 
ché l’Accumulatore è ad 8 bit e può 
quindi al massimo contenere 255, il ri¬ 
sultato dell’operazione sarà sbagliato 
(infatti A conterrà 14) e l’avvenuto «tra¬ 
bocco» sarà indicato dal bit di CARRY 
che assumerà il valore 1. 

Sostituiamo ora l’istruzione ADD A,B 
con l’istruzione SUB B (il cui codice è 
144) e carichiamo in B il valore 10. 
Riandiamo in esecuzione da 28000 ed 
osserviamo che la sottrazione è stata 
eseguita correttamente: infatti in A sa¬ 
rà contenuto il valore 4. Se andiamo in 
esecuzione, sempre da 28000, con i va¬ 
lori di A e B attuali (A = 4, B = 10), po¬ 
tremo vedere che il risultato della sot- 
Irazione è sbagliato (infatti è pari a 
250), in quanto c’è un riporto che è in¬ 
dicato dal flag di CARRY pari a 1. 

Da queste considerazioni si vede che il 


bit di CARRY è molto utile in Assembler 
per effettuare correttamente somme e 
sottrazioni. 

Accanto alle istruzioni viste, ne esisto¬ 
no altre in grado di effettuare somme e 
sottrazioni tenendo conto appunto del 
flag di CARRY: 

ADC A,n significato: 

A <-A + n + CARRY 
SBC A,n significato: 

A <-A-n-CARRY 
ADC A,r significato: 

A <-A+r+CARRY 
SBC A,r significato: 

A <-A-r-CARRY 
ADC A, (HL) significato: 

A <-A + (HL) + CARRY 
SBC A, (HL) significato: 

A < — A—(HL)—CARRY 

L’uso di ADC e SBC invece di ADD e 
SUB è molto utile quando si debbano 
eseguire somme e sottrazioni su paro¬ 
le di più bytes ed è quindi necessario 
tenere conto dei vari riporti che posso¬ 
no essere presenti. 

A questo punto passiamo senza indu¬ 
gio ad analizzare il programma in lin¬ 
guaggio macchina «ROTATTR» pre¬ 
sentato nell’articolo precedente; a cau¬ 
sa della lunghezza dell’argomento, 
spiegheremo in questo articolo le pri¬ 
me due routines (rotazione a destra e 
a sinistra) rimandando al prossimo la 
spiegazione delle due rimanenti, che 
fra l’altro, utilizzano istruzioni che me¬ 
ritano una più ampia trattazione, 
cn FIG 1 abbiamo riportato, sulla de¬ 
stra, il listing Assembler già presentato 
nell'articolo 5, mentre sulla sinistra il 
cisting di un programma in Basic del 
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tutto equivalente al precedente (pen¬ 
siamo che questo sia il metodo miglio¬ 
re per imparare a programmare in As¬ 
sembler). 

A) ROTAZIONE DA SINISTRA A DE¬ 
STRA (DA LINEA 10 A LINEA 130) 

Come si vede in FIG 2a per ottenere 
questa rotazione bisogna salvare gli at¬ 
tributi del carattere a riga 23 e colonna 
31 (23,31), dopodiché occorre ruotare a 
destra l'ultima riga ed infine ricopiare 
gli attributi salvati precedentemente 
nel carattere (23,0); il tutto viene ripetu¬ 
to per la riga 22 e cosi via fino ad arri¬ 
vare alla prima riga in alto (riga 0). 
Analizzate attentamente il programma 
Basic da linea 10 a linea 130: vedrete 
che esso svolge tale rotazione. A que¬ 
sto punto si tratta solo di vedere come 
la stessa funzione possa essere svolta 
da un programma Assembler. 

Le prime due linee di programma (10 e 
20) hanno l’equivalente diretto in As¬ 
sembler e quindi non offrono problemi. 
L'istruzione alla linea 30 invece non ha 
l’equivalente diretta e può essere otte¬ 
nuta copiando la coppia DE in HL e de- 
crementando quest’ultima. L'istruzione 
alla linea 40 può essere ottenuta diret¬ 
tamente utilizzando l’Accumulatore co¬ 
me registro temporaneo. 

Tutto il blocco di istruzioni Basic che va 
dalla linea 50 alla linea 90, può essere 
sostituito da una singola «SUPERI- 
STRUZIONE» dello Z80 che ha la for¬ 
ma: 

LDDR significato: 

(DE) <-(HL); 

DE <-DE-1; 

HL <- HL-1; 

BC < - BC-1 fino a BC = 0 

Questa istruzione copia nella cella di 
memoria il cui indirizzo è puntato da 
DE, il contenuto della cella di memoria 
il cui indirizzo è puntato da HL; vengo¬ 
no decrementate le coppie DE e HL 
(viene inoltre decrementata la coppia 
BC che funge da contatore, nel senso 
che serve per contare le volte che biso¬ 
gna eseguire tale operazione) e l’ope¬ 
razione viene ripetuta per BC volte. 
Poiché nel nostro programma si vo¬ 
gliono spostare verso destra tutti gli at¬ 
tributi di una riga di caratteri ed essen¬ 
do 32 i caratteri presenti su una riga, il 
contatore BC deve essere posto a 31 
(vedi istruzione linea 20). Terminata la 
rotazione a destra, gli attributi salvati 
precedentemente in Accumulatore 
vengono copiati nel carattere più a sini¬ 
stra (linea 100). 

Quindi la coppia DE viene decrementa¬ 
ta in modo da farle puntare l’indirizzo 
della cella che contiene gli attributi del 
carattere più a destra della riga prece¬ 


dente (istruzione linea 110). L’intera 
operazione va ripetuta per tutte le 24 ri¬ 
ghe che formano il video dello Spec- 
trum. Come ci si può accorgere che si è 
completata l'operazione? 

Un modo è quello di controllare se il 
valore della coppia DE è arrivato a 
22527 (vedi FIG 2a); questo significa 


I99*9fl1 



23295 


A) rotazione da sinistra a destra 

che bisogna controllare quando D = 87 
e E = 255. Purtroppo non esiste nel set 
di istruzioni dello Z80 un’istruzione in 
grado di confrontare un numero a 16 bit 
con un altro. Infatti la tipica istruzione 
di confronto è: 

CP n significato: 

A-n 

che si legge: confronta il contenuto del¬ 
l’Accumulatore con il numero n. È im¬ 
portante notare che l’Accumulatore 
non viene modificato da questa sottra¬ 
zione, nel senso che se A = 10 e si ese¬ 
gue l’istruzione CP 5, il contenuto del¬ 
l’Accumulatore continua ad essere 10, 
mentre la sottrazione 10-5 = 5 viene 
eseguita al solo scopo di vedere se il 
risultato è minore, uguale o maggiore 
di zero e modificare di conseguenza i 
bit del registro FLAGS. In particolare si 
ha: 

se A > n allora: 

CARRY = 0 ZERO = 0 
se A = 0 allora: 

CARRY = 0 ZERO = 1 
se A <n allora: 

CARRY = 1 ZERO = 0 

Il confronto può essere eseguito anche 
tra Accumulatore ed un registro interno 
dello Z80 mediante l’istruzione: 

CP r significato: 

A-r 

e si legge: confronta l'Accumulatore 
con il registro r, essendo r uno qua¬ 
lunque dei registri A, B, C, D, E, H, L 
È anche possibile confrontare l'Accu¬ 
mulatore con il contenuto di una cella 


di memoria; è necessario a tale scopo 
porre in HL l'indirizzo della cella di in¬ 
teresse ed utilizzare l'istruzione: 

CP (HL) significato: 

A-(HL) 

Tornando al problema di analizzare se 
DE ha assunto il valore 22527, la via più 
lunga sarebbe quella di controllare se 
D = 87 ed, in caso affermativo, se 
E = 255. Quest’ultimo controllo è però 
superfluo se si pensa che, poiché l'o¬ 
perazione che noi eseguiamo è quella 
di decrementare DE a passi di uno, in¬ 
contrare D = 87 coinciderà con la pre¬ 
senza nel registro E di 255 (natural¬ 
mente questo sarà molto più chiaro a 
chi conosce la rappresentazione «ESA- 
DECIMALE» dei numeri; per gli altri 
facciamo notare che il valore 
DE = 22527 significa D = 87 e E = 255, 
mentre il successivo valore DE = 22528 
significa D = 88 e E = 0). In definitiva sa¬ 
rà sufficiente controllare che D valga 87 
per essere sicuri che bisogna termina¬ 
re la routine; ecco il motivo per cui il 
contenuto del registro D viene «copia¬ 
to» in Accumulatore dove viene con¬ 
frontato con 87. Nei casi in cui il risulta¬ 
to del confronto sia diverso da zero, l'o¬ 
perazione deve essere ripetuta e quin¬ 
di bisogna tornare alla linea 20; nel ca¬ 
so in cui invece il risultato del confron¬ 
to sia zero (cioè A = 87), l’operazione 
deve essere conclusa. 

Ecco che abbiamo introdotto il concetto 
di «SALTO CONDIZIONATO» che si af¬ 
fianca a quello ben noto ai programma- 
tori BASIC di «SALTO INCONDIZIONA¬ 
TO» ottenuto con la classica istruzione 
GOTO. In Assembler tale istruzione è 
chiamata JUMP ed è abbreviata con 
JP. L’istruzione: 


JP nn significato: 

PC <-nn 

si legge: salta all'Indirizzo nn. Eviden¬ 
temente nn è un numero a 16 bit ed è 
quindi necessario utilizzare per tale 
istruzione tre bytes: uno per il codice 
operativo e due per l'indirizzo, ricor¬ 
dando di mettere prima il byte meno si¬ 
gnificativo e poi quello più significativo. 
Per esempio, se si vuole fare un salto 
all’indirizzo 28000, essendo tale nume¬ 
ro rappresentato con due bytes di cui il 
meno significativo è 96 mentre quello 
più significativo è 109, l’istruzione JP 
28000 sarà data dalla successione dei 
tre bytes 195, 96,109. 

L’indirizzo cui si vuole saltare può es¬ 
sere specificato anche dalla coppia di 
registri HL mediante l’istruzione: 
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JP (HL) significato: 

PC <—HL 

Accanto all'istruzione di salto incon¬ 
dizionato, vi è quella di salto condizio¬ 
nato ottenuta in Basic con l'istruzione: 

IF (condizione) 

THEN GOTO (linea Basic) 

In Assembler le condizioni che è pos¬ 
sibile testare sono: 

NZ = Risultato diverso da zero 
Z = Risultato uguale a zero 
NC = Non è stato settato il flag di 
CARRY 

C = È stato settato il flag di CARRY 
PO = È stato settato il flag di Parità 
Dispari 

PE = È stato settato il flag di Parità 
Pari 

P = Il risultato è positivo (il bit 7 è 
zero) 

M = Il risultato è negativo (il bit 7 è 
uno) 

La generica istruzione di salto condi¬ 
zionato è: 

JP cc,nn significato: 


PROGRAMMA 


se cc è vera, allora PC < - nn 

he si legge: se la condizione cc è ve¬ 
rificata, salta all'indirizzo nn, essendo 
cc una qualsiasi delle condizioni viste 
precedentemente - NZ, Z, NC, C, PO, 

PE, P, M. Anche questa, come l'istru¬ 
zione di salto incondizionato, dovendo 
specificare l'indirizzo cui si vuole salta¬ 
re, è costituita da tre bytes. 

Quindi il salto condizionato presente 
alla linea 120 del programma BASIC è 
ottenuto in Assembler con la sequenza: 
LD A, D; CP 87; JR NZ, REP che in prati¬ 
ca dice: se il registro D non contiene 
87, allora salta (torna indietro) alla li¬ 
nea 20 (chiamata con il nome simbolico 
REP, utilizzando una cosidetta «LA¬ 
BEL»); altrimenti prosegui. 

Avrete certamente notato che nel pro¬ 
gramma viene utilizzata l’istruzione JR 

NZ, REP invece della sopradescritta JP 
NZ, REP. Per il momento considerate le 
due istruzioni equivalenti; la differenza 
sarà analizzata nel prossimo articolo. 

B) ROTAZIONE DA DESTRA A SINI¬ 
STRA (DA LINEA 140 A LINEA 260) 

La struttura del programma (vedi FIG 
2b) è analoga alla routine precedente e 
quindi non la analizzeremo. L'unica dif¬ 
ferenza è costituita dall’istruzione: 



B) rotazione da destra a sinistra 


LDIR significato: 

(DE) <-(HL); 

DE <-DE + 1 HL <-HL + 1; 

BC < - BC-1 fino a BC = 0 

Analogamente a LDDR, l'istruzione 
LDIR è una superistruzione che copia 
nella cella di memoria con indirizzo 
puntato da DE, il contenuto della cella 
di memoria di indirizzo puntato da HL; 
vengono quindi incrementate le due 
coppie DE e HL e decrementa la cop¬ 
pia BC e l'intera operazione viene ripe¬ 
tuta per BC volte, cioè fino a quando 
BC diviene zero. 

Nel prossimo articolo vedremo le rima¬ 
nenti due routines di rotazione. Buon 
lavoro. 


PROGRAMMA ASSEMBLER 


IO 

LET DE-23295 



140 

LET DE-22528 

L_R 

LD DE,23295 

R_L LD DE,22528 

20 

LET BC-31 



150 

LET BC-31 

REP 

LD BC,31 

REP1 LD BC,31 

30 

LET HL=DE-1 



160 

LET HL-DE+1 


LD H,D 

LD H,D 








LD L,E 

LD L,E 








DEC HL 

INC HL 

40 

LET TEMP-PEEK 

(DE) 


170 

LET TEMP-PEEK (DE) 


LD A,(DE) 

LD A,(DE) 

50 

POKE DE,PEEK HL 


180 

POKE DE,PEEK HL 


LDDR 

LDIR 

60 

LET DE-DE-1 



190 

LET DE-DE+1 




70 

LET HL-HL-1 



200 

LET HL-HL+1 




80 

LET BC-BC-1 



210 

LET BC-BC-1 




90 

IF BCOO THEN 

GOTO 

50 

220 

IF BCOO THEN GOTO 180 




100 

POKE DE,TEMP 



230 

POKE DE,TEMP 


LD (DE),A 

LD (DE),A 

110 

LET DE-DE-1 



240 

LET DE-DE+1 


DEC DE 

INC DE 

120 

IF DE<>22527 

THEN 

GOTO 20 

250 

IF DE<>23296 THEN GOTO 150 


LD A,D 

LD A,D 








CP 87 

CP 91 








JR NZ,REP 

JR NZ,REP1 

130 

STOP 



260 

STOP 


RET 

RET 


40 
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CPU 6502 


PARTE PRIMA 



COME FUNZIONA UN CALCOLATORE? COME SI COPIANO I PROGRAMMI? COME INTERAGISCONO LE 
URIE UNITA ' DEL SISTEMA? A QUESTE ED A MOLTE ALTRE DOMANDE CERCHEREMO DI 
RISPONDERE NELLA NUOVA RUDRICA DI LIST SUL LINGUAGGIO MACCHINA DEL CB4 


di Paolo Ciancarini 


Ì|pnni fa fu tratto un film 
ÌÌÌBp assa i spettacolare da 
iilSii un famoso libro di fan¬ 
tascienza: Viaggio alluci¬ 
nante, di Isaac Asimov. 

Vi si narrava delle avventure 
di un gruppo di intrepidi 
scienziati, rimpiccioliti da 
una macchina fantastica alle 
dimensioni di un microbo. A 
bordo di un sommergibile, 
miniaturizzato anch’esso, 
questi venivano introdotti 
nel corpo di una persona per 
eseguire un’operazione di 
alta chirurgia sul cervello, 
impossibile con altri mezzi. 
Abbiamo pensato, in un cer¬ 
to senso di copiare l’idea, 
avventurandoci, però, inve¬ 
ce che in arterie e organi va¬ 
ri di un corpo umano, nei 
meandri di un computer, per 
cercare di capire meglio, in¬ 
sieme a voi, come è fatto e 
come funziona questa mac¬ 
china fantastica. 

Accetteremo solo volontari, 
per questa missione impos¬ 
sibile. Il nostro obiettivo lo 
dichiariamo subito: il micro- 
processore 6502, il cervello 
del Commodore 64 (e di altri 
personal, come il glorioso 
Apple). 

Prima di entrare nel som¬ 
mergibile, abbiamo ovvia¬ 
mente bisogno di avere 
qualche informazione sul 
teatro delle operazioni. Na¬ 
turalmente sarà bene che 
abbiate qualche familiarità 
col linguaggio BASIC. Più ne 
avete, meglio è. Il resto ve lo 
diremo noi. 


1. Che cos’è il linguaggio 
macchina? 

Sebbene le apparenze mo¬ 
strino il contrario, il linguag¬ 
gio vero del Commodore 64 
non è il BASIC, ma il lin¬ 
guaggio macchina del pro¬ 
cessore 6502. 

In ogni momento della sua 
attività, il processore del 
C64 esegue solo linguaggio 
macchina. Questo vale per 
qualsiasi computer: linguag¬ 
gi di alto livello come il BA¬ 
SIC o il LOGO, non sono al¬ 
tro che facilitazioni di pro¬ 
grammazione offerte agli es¬ 
seri umani per evitare la fati¬ 
ca di adattarsi alla logica 
meramente binaria dei pro¬ 
cessori. 

Molti pensano che program¬ 
mare in linguaggio macchi¬ 
na sia difficile. Considerate 
le due sequenze di «istruzio¬ 
ni» che diamo di seguito: 
cercano di descrivere in due 
modi assai diversi la stessa 
attività. 

BASIC 

Accendi il motore, togli il fre¬ 
no, ingrana la marcia e dai 
gas. 

LINGUAGGIO MACCHINA 

Prendi la chiave d'avvia¬ 
mento. Inseriscila nell’appo¬ 
sita serratura. 

Schiaccia col piede il pedale 
in basso a sinistra (detto fri¬ 
zione). 


Gira la chiave di cui sopra 
verso destra. 

Se il motore non si avvia, ri¬ 
prova il passo precedente. 
Abbassa la leva del freno a 
mano, sulla destra del posto 
di guida... 

La seconda sequenza è for¬ 
se più difficile? Sembra più 
complessa, e evidentemente 
è più lunga, ma i singoli pas¬ 
si sono di certo più semplici 
da comprendere e da ese¬ 
guire precisamente. 
Programmare in linguaggio 
macchina è un po’ come sa¬ 
lire le scale gradino dopo 
gradino, invece che prende¬ 
re un'ascensore. Ci vuole 
più tempo (anche 10 volte) 
per costruire i programmi: 
sia per progettarli, che per 
scriverli, nonché corregger¬ 
li. 

Ma allora, se quasi tutto ciò 
che si può’ fare in linguaggio 
macchina si può fare anche 
in BASIC, e con meno fatica, 
perché perderci tempo? 

La ragione è una sola: la ve¬ 
locità di esecuzione. 

I programmi scritti in lin¬ 
guaggio macchina vengono 
eseguiti in un tempo inferio¬ 
re da 10 a 100 volte rispetto 
agli stessi programmi scritti 
in BASIC. 

II tempo di esecuzione non 
sempre è importante. Un 
programma di magazzino 
con fatturazione integrata, 
ad esempio, passa la mag¬ 
gior parte del tempo a stam¬ 
pare o a salvare dati su di¬ 


sco. E queste operazioni non 
dipendono dal processore. 
Se si vuole accelerare un 
programma del genere, si 
può solo comprare una 
stampante o un disk drive 
più veloci. 

In altri casi il tempo di ese¬ 
cuzione è fondamentale. Ad 
esempio, i nostri lettori 
avranno verificato che i vi¬ 
deogiochi scritti in BASIC 
sono abbastanza lenti. Il fat¬ 
to è che l’animazione veloce 
di figure sullo schermo è un 
compito che implica migliaia 
e migliaia di calcoli coordi¬ 
nati e per di più complessi. 
La scelta migliore, spesso, è 
sostituita da una combina¬ 
zione dei due modi di pro¬ 
grammare. Per esempio, un 
programma di gestione 
aziendale per lo più non ha 
grandi necessità di rapida 
esecuzione. Ci sono però al¬ 
cune fasi che consistono es¬ 
senzialmente nell’ordinare 
gli elementi di un insieme: 
per esempio stampare alfa¬ 
beticamente i pomi dei clien¬ 
ti cui è stata'rilasciata una 
fattura. I programmi di ordi¬ 
namento scritti in BASIC so¬ 
no terribilmente lenti: per un 
migliaio di dati possono im¬ 
piegare anche 10 minuti, il 
che rappresenta davvero 
un'eternità. Il programmato- 
re in gamba sceglie allora di 
programmare direttamente 
in linguaggio macchina la 
parte di programma che ef¬ 
fettua l'ordinamento, e tutto 
il resto in BASIC. Questo ri- 
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CPU 6502 


duce il tempo di attesa ad 
una manciata di secondi. 
Questa tecnica è usata in pa¬ 
recchi programmi. 

Con questo numero comin¬ 
ciamo un minicorso di lin¬ 
guaggio macchina. 

Buon divertimento! 

2 II codice binario 

La prima cosa da fare quan¬ 
do si esplora un paese sco¬ 
nosciuto (dopo essersi assi¬ 
curati che gli indigeni non 
sono ostili) è apprendere il 
linguaggio del luogo. 

Se credete di imparare il lin¬ 
guaggio macchina rispar¬ 
miandovi la fatica di impara¬ 
re il sistema binario o esa- 
decimale, smettete pure di 
leggere subito. 

Il sistema di rappresentazio¬ 
ne binario (e la sua forma 
abbreviata, il sistema esa- 
decimale) è il linguaggio 
«vero» di qualsiasi compu¬ 
ter. Cercherò dunque per 
prima cosa di darvi qualche 
nozione fondamentale sui si¬ 
stemi binario ed esadecima- 
le. 

Immagino che sarete d'ac¬ 
cordo con me nell'affermare 
che i simboli «1» e «0», 
stampati insieme cosi 
10 

hanno un significato partico¬ 
lare. 

Ciò che voglio dire è che un 
conto è la quantità da rap¬ 
presentare. un altro conto il 
simbolo che la rappresenta. 
Se volessimo, potremmo 
metterci d'accordo e dire 
che la quantità «dieci» la 
rappresentiamo in una ma¬ 
niera diversa. Per esempio 
con un solo simbolo: l’asteri¬ 
sco «*». 

Potremo allora mettere sulla 
maglia di Platini il numero 
«*», oppure dire che * per * 
fa «cento», e cosi via. 

Un momento: CHI dice che * 
per * fa cento? Non dovreb¬ 
be forse fare 
* 0 ? 

Ecco, il problema è proprio 
questo: se usiamo simboli 
diversi dalle solite dieci (o 
meglio, «*») cifre, tutte le ta- 
belline, cosi come i metodi 
di calcolo delle quattro ope¬ 
razioni (detti algoritmi) van¬ 
no cambiati. 

E cosa succede se, invece di 


AGGIUNGERE simboli, deci¬ 
diamo di ELIMINARNE? 

Per esempio, supponiamo di 
proibire l'uso di tutte le cifre 
tranne la cifra «1». 

Scrivere numeri sarebbe 
molto noioso: 

1 significa sempre «uno» 

II significa «due» 

III significa «tre», ecc. 

Fare le somme però sareb¬ 
be molto semplice: baste¬ 
rebbe concatenare una di 
seguito all'altra le rappre¬ 
sentazioni dei due addendi: 

11-l-11 fa 1111 

li sistema «unario» è senza 
dubbio semplice, ma molto 
scomodo non appena si usa¬ 
no numeri grossi. Senza 
contare la difficoltà di ridefi¬ 
nire le altre operazioni: Pro¬ 
vate a fare moltiplicazioni! 

Se permettiamo l’uso di 
esattamente DUE simboli le 
cose cambiano, e di molto. 
Innanzitutto, cosa significa 
usare più di un simbolo? 
Torniamo per un momento 
al nostro buon vecchio siste¬ 
ma decimale. 

Il sistema decimale è un si¬ 
stema POSIZIONALE. 

Un numero come 256 (per 
ora non leggetelo come 
«duecentocinquantasei», ma 
come «duecinquesei») ha 
un significato ben preciso 
che è dato dalle posizioni re¬ 
lative delle cifre che lo com¬ 
pongono: 

256 significa 

2 centinaia, 5 decine, 6 unità 
ovvero 

2x100 + 5x10 + 6x1 

ed è ben diverso da 652, che 

pur essendo composto dagli 

stessi simboli, significa 

6x100 + 5x10 + 2x1 

cioè un numero ben più 

grande. 

Questo sistema di rappre¬ 
sentare le quantità numeri¬ 
che è stato introdotto da un 
astronomo arabo parecchi 
secoli fa. 

Un'altra maniera di capire 
come funziona il sistema di 
rappresentazione a base 10 
è la seguente. 

Pensate al contachilometri 
di un’automobile. È fatto da 
5 ruote (su certi modelli le 
ruote sono 6 o 7); su ciascu¬ 
na ruota ci sono 10 simboli; 
le dieci cifre decimali, da 0 a 
9. 

La ruota più a destra gira più 


velocemente di tutte, e 
quando ha compiuto un giro 
fa «scattare» di un simbolo 
la ruota accanto. A sua volta, 
quest'ultima pian piano 
completerà il suo giro e farà 
scattare quella accanto a si¬ 
nistra, e cosi via. 

Notate che, poiché abbiamo 
solo 5 ruote, il numero più 
grande che possiamo rap¬ 
presentare è 99999, dopodi¬ 
ché il contachilometri rico¬ 
mincia da 00000. 

Ebbene, proviamo ora ad 
«inventare» un contachilo¬ 
metri in base 2. È molto sem¬ 
plice significa che su ogni 
ruota abbiamo solo 2 simbo¬ 
li, diciamo 0 e 1. Se mettia¬ 
mo in moto, sulla finestrella 
del cruscotto compariranno 
in successione i seguenti 
numeri: 

00001 dopo un chilometro 
00010 dopo 2 km 
00011 dopo 3 km 
00100 dopo 4 km 
ecc. 

Visto come è facile contare 
in base 2? Ogni volta che 
una ruota passa da 1 a 0, 
quella accanto a destra scat¬ 
ta di un simbolo. Il massimo 
numero di km rappresenta¬ 
bile con 5 ruote è 11111, che 
corrisponde a... ditemelo 
voi! 

Un contachilometri decimale 
ha 10 simboli per ruota; un 
contachilometri bianrio ha 2 
simboli per ruota; uno esa- 
decimale ha 16 simboli per 
ruota. Le cifre non bastano: 
ci occorrono 6 simboli in più. 
Useremo le prime 6 lettere 
dell’alfabeto, e sulle ruote 
avremo i seguenti simboli: 

0123456789ABCDEF 
Vediamo come funziona 
questo contachilometri: 

00001 dopo un km 
00009 dopo 9 km 
0000A dopo 10 km 
0000B dopo 11 km 
0000F dopo 15 km 
00010 dopo 16 km 
000FF dopo 255 km 
00100 dopo 256 km. 

Il numero più grande rappre¬ 
sentabile con 5 ruote è 
FFFFF, cioè... 

Come vedete, contare non è 
mai difficile: basta sapere 
che, ogni volta che una ruo¬ 
ta arriva al simbolo di valore 
più alto (1 nel caso binario, 9 
nel caso decimale e F in 


quello esadecimale) occorre 
far scattare la ruota accanto 
di un simbolo, e ricomincia¬ 
re da 0 su questa. 

Questo significa anche che 
ogni ruota vale n volte quel¬ 
la più a sinistra (dove n è il 
numero di simboli per ruota 
la base di numerazione). 

È facile allora convertire il 
valore di un numero da base 
qualsiasi a base 10: 

11111 equivale a 
1*16+1*8+1*4+1*2+1=31 


FFFFF equivale 
15*65536 + 15*4096 + 
15*256+15*16+15 = 

1048575. 

In generale, se avete un nu¬ 
mero rappresentato in base 
k con n cifre, la formula di 
conversione è la seguente: 

sia Cn-1 Cn-2...C1 Co 
la rappresentazione del nu¬ 
mero; il suo valore in base 

10 è 

C- 

n-1*k + Cn-2*k + ...C1*k + Co 

Provate a scrivere un pro¬ 
gramma che calcola le con¬ 
versioni in base a questa 
formula. 

11 procedimento inverso, 
cioè passare da base 10 a 
base k, non ve lo spiego. Vi 
dò invece un programma in 
LOGO che converte un nu¬ 
mero rappresentato in base 
10 in un'altra base qualsiasi 
(da 2 a 16). 

PER BASEQUALSIASI 
LOCALE "SIMBOLI 
LOCALE"NUMERO 
LOCALE"BASE 
AS "SIMBOLI 

[0 123456789ABCDE 
F] 

ST [QUALE NUMERO VUOI 
CONVERTIRE] 

AS "NUMERO PRI LEGGI- 
RIG 

ST [IN QUALE BASE] 

AS "BASE PRI LEGGIRIG 
TRADUCI :NUMERO :BASE 
FINE 


PER TRADUCI :N :B 
SE'.NUMERO = ORI "0 
RI PAROLA TRADUCI 
(QUOZIENTE :N :B) :B ELE¬ 
MENTO ((RESTO :N :B) + 1) 
SIMBOLI 
FINE 
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TSUUAWA TARI MONKEY 





1 • Una volta aperta la scatola del kit, ci si trova alle pr ese con una 
miriade di bustine sigillate, contraddistinte da numeri di identifica¬ 
zione, ed al foglio contenente il piano di montaggio. 


2 - La prima fase del montaggio consiste nell'assemblare il «corpo» 
del robot: in primo piano gli ingranaggi che trasmettono il movimen¬ 
to alle braccia meccaniche. 



3 - Il «corpo» di Monkey è stato assemblato completamente: sono 
state aggiunte anche le appendici laterali che faranno da perno per 
il movimento delle «braccia». 

Ecco come si deve procedere per l'inserimento del motorino elettri¬ 
co che provvederà al movimento sul filo di nylon. 


4 - Posizionato correttamente il motorino non rimane che fissarlo 
saldamente con le apposite viti fornite nel kit. 


I MOVIT stanno riscuotendo un sempre 
più largo consenso, sia da parte degli 
appassionati di robotica, sia dai più 
giovani, affascinati da queste scatole 
di montaggio che si pongono a metà tra 
il puro e semplice gioco e l'applicazio¬ 
ne pratica di concetti di ingegneria 
meccanica ed elettronica, spesso solo 
studiati in maniera esclusivamente teo¬ 
rica e quindi riduttiva. 

In questa occasione, abbiamo deciso di 
affiancare alla «prova» dei Wizards, 
che appare su queste stesse pagine, 
anche quella di uno dei MOVIT più pic¬ 
coli e semplici, ma che si dimostra per 
la sua idea di base, uno dei più simpati¬ 
ci al pubblico: la scimmietta TSUNA- 
WATARI MONKEY. 


Monkey è un piccolo e divertente robot, 
la cui caratteristica principale consiste 
nel procedere arrampicandosi lungo 
una corda rispondendo ad un ordine 
vocale oppure ad un rumore (ad esem¬ 
pio un battito di mani). 

I suoni vengono captati da un microfo¬ 
no a condensatore, inserito sulla pia¬ 
stra che contiene «l'elettronica», la 
quale provvede a trasmettere i segnali 
ad un piccolo amplificatore a due tran¬ 
sistor; questo, a sua volta, pilota una 
specie di interruttore, elettronico com¬ 
posto da altri due transistors. 

Tutto il circuito funziona in modo tale 
che quando il motorino non è alimenta¬ 
to, i transistors dello stadio finale del¬ 
l’interruttore assorbono pochissima 


corrente prolungando in tal modo la 
«vita» delle batterie. 

La durata del ciclo di movimento è di 
circa 3-4 secondi, ma variando la sen¬ 
sibilità del microfono si può giungere al 
funzionamento continuo decretato dal¬ 
la captazione dei rumori più deboli. 

La scimmietta Monkey è in realtà una 
evoluzione di un altro modello MOVIT: 
il SOUND SKIPPER. 

Il corpo è il medesimo, cosi com'è an¬ 
che identica la parte elettronica; l'unica 
differenza consiste esclusivamente ne¬ 
gli «arti» che contraddistinguono i due 
robots. 

Come tutti i MOVIT, anche questo è un 
kit facilissimo da montare: a riprova di 
ciò abbiamo pensato di coinvolgere an- 
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5 • Monkey comincia a prendere forma: si è infatti passati al montag- 6 - Un primissimo piano del «cervello» di Monkey mentre sta per es- 
gio della base che dovrà accogliere l’elettronica del robot. sere posizionato abilmente sui bulloni di fissaggio. 

Si distingue il filo schermato grigio del microfono che attiva il circui¬ 
to. 




7 - L'elettronica è stata fissata, cosi come il sostegno elastico della 8 - Ultima fase di montaggio: si posizionano gli «arti prensili» prece- 
capsula microfonica e la cupoletta trasparente che ricopre la «testa» dentemente preassemblati, non rimane che fissarli adeguatamente, 
di Monkey. 

Non rimane che fissare i bulloncini con la piccola chiave inglese for¬ 
nita nella scatola di montaggio. 


che un membro femminile della nostra 
redazione costringendolo a svolgere il 
lavoro di assemblaggio precedente la 
stesura di questo articolo. 

Per tale motivo una bella mattina, una 
delle nostre segretarie di redazione, 
Antonella Corica, si è vista letteral¬ 
mente «appioppare» l'incombenza di 
svolgere il lavoro di montaggio del 
Monkey. 

Bisogna ammettere che dopo un primo 
attimo di leggero stupore, le fasi di 
montaggio sono andate avanti in modo 
rapido e sicuro ed a dire il vero, l’unica 
volta in cui personalmente c'è stato il 
tentativo di far notare quello che sem¬ 
brava un errore — colmo dei colmi! — 
è stata necessaria una rapida retro¬ 



9 - Il lavoro è terminato. 

Il Monkey è completo ed è pronto per essere 
appeso alla sua «liana». La nostra segreta¬ 
ria, Antonella Corica, mostra con grande 
soddisfazione il frutto del proprio lavoro, 
svoltosi, tra fotografie e montaggio vero e 
proprio del kit, per circa un'ora. 


marcia per evitare di arrossire dalla 
vergogna di fronte all’evidenza del fat¬ 
to che l’errore supposto non esisteva 
affatto...! 

In definitiva si è avuta la chiara dimostra¬ 
zione che grazie alle ottime istruzioni, 
ora scritte in italiano, ed ai piani di mon¬ 
taggio molto ben illustrati, è molto diffici¬ 
le sbagliare nelle fasi di assemblaggio, 
anche per chi è la prima volta che si ci¬ 
menta in una impresa del genere. 

Per facilitarvi ulteriormente nel compito, 
sempre che abbiate deciso di acquistare 
il Monkey per poi montarlo, vi proponia¬ 
mo una serie di foto illustrative che docu¬ 
mentano adeguatamente le fasi di mon¬ 
taggi 0 - □ Massimo Truscelli 
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I PROGRAMMABILI 



Vi avevamo anticipato qual- 

che tempo fa, la prob abile in¬ 
troduzio ne sul mercat o na¬ 
zionale di un prodotto della 
MOVIT, interfacciab ile con il 
Commodore 64. 


Nel N. 8-9/1985 abbiamo già avuto mo¬ 
do di parlare di questo robot program¬ 
mabile (in risposta alla lettera del letto¬ 
re Luciano Tursi), riproponendoci di 
poter al più presto disporre di un esem¬ 
plare per una eventuale prova sulle pa¬ 
gine di LIST. 

In seguito ad una serie di contatti tra la 
nostra redazione, l'importatore esclu¬ 
sivo nazionale T.EX.IM. Italia e l’agente 
generale europeo della ELEHOBBY in 
Belgio, in questo momento il famigera¬ 
to MSX Wizard MOVIT II è. (nella sua 
duplice versione per standard MSX e 
per Commodore 64), oggetto di vivo in¬ 
teresse da parte dei collaboratori, 
mentre troneggia su una delle scriva¬ 
nie della redazione. 

In queste pagine vi presentiamo le ca¬ 
ratteristiche di questo robot che tanto 
successo ha riscosso recentemente, 
anche in manifestazioni di largo inte¬ 
resse popolare. 

Essendo stati fortunati nell'aver avuto 
a disposizione entrambe le versioni, 
abbiamo pensato di effettuare una pro¬ 
va comparata dei due modelli. 


MSX Wizard - Come si presenta 

Gli esemplari ci sono giunti nella loro 
confezione originale, uguale per tutte e 
due le versioni, che reca, a dire il vero, 
solo la dicitura MSX ed alcune indeci¬ 
frabili scritte in giapponese. 

Una volta aperta la scatola, si può con¬ 
statare, contrariamente alla preceden¬ 
te serie di MOVIT venduta in scatola di 
montaggio e quindi con tutti i pezzi da 
assemblare che questa seconda serie 
è già assemblata, montata e pronta per 
l'uso; il Wizard è contenuto in due scoc¬ 
che di polistirolo espanso che lo pro¬ 
teggono da eventuali urti insieme alla 
cartuccia di programmazione discon¬ 
nessa dal MOVIT e da inserire poi nel 
robot. 


Il «LOOK» 


L'estetica è senza dubbio molto grade¬ 
vole ed è caratterizzata dai cingoli late¬ 
rali, inseriti su un triangolo di ruote 
dentate, e dalla grossa cupoletta di pla¬ 
stica trasparente che si protende in 
avanti con il connettore per la cartuccia 
di programmazione. 

Nella parte posteriore uno sportellino 
scorrevole cela il contenitore delle bat¬ 
terie, esattamente una pila del tipo da 9 
Volt e due del tipo da 1,5 Volt a stilo, 
collegate in serie. 

Anteriormente si possono notare, in 
una fascia contornata da due scanala¬ 
ture e dalla capsula dell'avvisatore 


acustico, l’interruttore generale ON- 
OFF e i due pulsanti START e STOP che 
avviano la sequenza di lettura dei dati 
incisi sulla cartuccia o, eventualmente, 
la interrompono. 


La programmazione^_ 

La programmazione del Wizards avvie¬ 
ne tramite computer: è questa la carat¬ 
teristica certamente più interessante di 
tali prodotti che mostrano come il com¬ 
puter si possa usare anche come «con¬ 
trollore» di altri apparati o strumenti 
elettronici, ad esso più o meno diretta- 
mente collegati. 

La procedura di programmazione è 
piuttosto semplice e si avvale dell'ausi¬ 
lio di un computer MSX oppure di un 
Commodore 64. 

La prima operazione da compiere è sfi¬ 
lare la cartuccia dal robot ed inserirla 
nello slot del computer facendo atten¬ 
zione che quest'ultimo sia spento, cosi 
come anche il MOVIT. 

Una volta acceso il computer viene vi¬ 
sualizzato un menu, ravvivato dalla 
presenza di un'animazione riproducen- 
te il robot che attraversa continuamen¬ 
te lo schermo. 


Il Menu 


Le opzioni offerte sono 3, e per la preci¬ 
sione: EDIT, CHARGING, e DISCODING. 
Selezionando la prima, si accede ai da¬ 
ti di programmazione; è inevitabile che 




46 


LIST 10/11 


































DISTRIBUTORE: TEXIM ITALIA S.r.l. 

V.le dell'Esperanto, 71 - 00144 Roma Eur 
Tel. 06/5918939 


VIZAHOs A CONFRONTO 


tale scelta, se effettuata senza aver 
preselezionato il DISCODING conduce 
alla visualizzazione di dati che non cor¬ 
rispondono a quelli inseriti nella car¬ 
tuccia. La funzione DISCODING decodi¬ 
fica i dati inseriti nella RAM del robot, 
riversandoli nella RAM del computer; 
viceversa la funzione CHARGING tra¬ 
sferisce i dati di programmazione, svi¬ 
luppati nella fase di EDIT, dalla memo¬ 
ria del computer alla RAM delia cartuc¬ 
cia da inserire poi nel Wizard. 

In fase di EDIT sullo schermo del com¬ 
puter viene visualizzato un altro menu 
che offre le seguenti possibilità: 
motore sinistro, motore destro, beep, 
light, counter, mov. 

Nella parte bassa dello schermo com¬ 
paiono invece le operazioni di pro¬ 
grammazione assegnate ai tasti funzio¬ 
ne presenti su ogni MSX: ON, OFF, IN- 
ST, DEL, MENU. Per ognuna delle pri¬ 
me quattro colonne, schiacciando il ta¬ 
sto ON oppure OFF, viene visualizzata 
la condizione di accesso o spento dei 
due motori, del segnale acustico e del¬ 
le segnalazioni luminose, mentre nella 


casella COUNTER viene visualizzato il 
numero di «steps» raggiunto nella pro¬ 
grammazione, che può essere massi¬ 
mo di 256. 

Una caratteristica da notare è che se si 
pone in ON il motore di destra, il Wi¬ 
zard gira a sinistra e viceversa; per for¬ 
tuna nell’ultima colonna a destra viene 
visualizzato il movimento ottenuto: 
LEFT, RIGHT, oppure FORWARD se si 
pongono in ON entrambi i motori. 

Gli altri tasti permettono di inserire una 
nuova linea di programmazione tra due 
già esistenti, di cancellare una linea 



non più desiderata, e di tornare al me¬ 
nu iniziale ogni volta che lo si ritenga 
necessario. 


L’interno 


Non abbiamo resistito alla tentazione 
di smontare il Wizard almeno in parte 
per vedere come era fatto. 

Allentate le tre viti che reggono la cu- 
poletta plastica si accede ad una metà 
del circuito stampato che ospita la cir- 
cuiteria elettronica dove spiccano il 
connettore per la cartuccia e 4 circuiti 
integrati di produzione Mithsubischi e 
NEC, le cui sigle sono per la precisio¬ 
ne: D4040BC, D4069UBC, MN4081B, 
MN4073B. 

Sui lati del connettore trovano posto 
due led rossi che lampeggiano per se¬ 
gnalare il cambiamento di direzione 
ogni volta che viene usato un solo mo¬ 
tore; più in basso, nel «corpo» del ro¬ 
bot, si intravede un ulteriore circuito in¬ 
tegrato, ma abbiamo preferito non pro¬ 
seguire nell’indagine per evitare di tro¬ 
varci, alla fine, con un mucchietto di 



In occasione deH'ultimo SIM svoltosi a 
Milano nello scorso settembre, ci è capitato 
uno «strano» episodio legato ai MOVIT che 
vi vogliamo raccontare anche se a distanza di 
tempo dalla manifestazione. 

Quando si è operatori economici del settore si 
ha la possibilità di accedere anche a quegli 
spazi espositivi in cui di regola il normale 
pubblico non potrebbe accedere, e cosi 
passeggiando tra gli stands ingombri di 
apparecchiature per la produzione video e 
audio, telecamere, regie, effetti speciali, 
impianti scenici, trasmettitori FM e TV, 
registratori multipista, banchi di missaggio e 
magiche modello disposte a trascorrere il 
tempo tra il calore dei riflettori e gli sguardi 
curiosi delle telecamere, nello stand della 
AUDIOVISUAL SYSTEMS abbiamo scorto 
tre esemplari del MOVIT II che facevano 
bella mostra di sé. 

Si trattava di tre Wizards programmati per 
compiere alcune evoluzioni su un piccolo 


palcoscenico, ripresi dall’occhio indagatore 
delle telecamere. 

Attorno ad essi tanti altri esemplari della 
produzione MOVIT a svolgere la parte di 
coprotagonisti di una storia irreale e fiabesca. 
Approfittando della personale conoscenza di 
chi programmava i MOVIT. siamo riusciti a 
curiosare un po’ nello stand aggirandoci tra 
«megalitiche» telecamere marcate HITACHI, 
il cui solo carrello costava svariate decine di 
milioni, e tra indaffarati tecnici dagli 
«occhietti a mandorla» chini su monitors 
vettoriali e di forme d'onda, intenti a 
controllare la messa in fase dei complessi 
segnali destinati alla regia video. 

I nostri piedi hanno calpestato un mondo 
tecnologico incantato, in cui, ancora una 
volta, l’elaboratore recita la parte più 
importante: un computer alla regia delle luci 
per la creazione di fantasmagorici effetti 
luminosi nelle fasi di ripresa dei MOVIT, un 
computer per la generazione sintetica degli 


scenari, degli sfondi, delle scritte e chissà 
ancora quali altre diavolerie. 

Un universo favoloso in cui rclcttronica, si 
esprimeva ai massimi livelli ed in cui, in tutta 
onestà, i Wizards hanno dimostrato di essere 
capaci di suscitare la curiosità e l’interesse 
anche di tecnici particolarmente qualificati, 
capaci di ben valutare le caratteristiche non 
solo tecniche, ma anche spettacolari di questi 
prodotti. 

Un trionfale successo valutabile solo se si 
fosse potuto assistere allo show che i 
monitors mostravano, oppure se si fosse 
potuto assaporare, come ci è successo, 
l’atmosfera fantascientifica, ma non troppo, 
che i Wizards sono riusciti ad esaltare in uno 
spazio già tecnologicamente estremamente 
avanzato! 

Complimenti Wizards, siete riusciti a farci 
distogliere lo sguardo anche dalla modella che 
posava per le telecamere dello stand accanto!!! 

MT 
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VIZAHOs A CONFRONTO 


pezzi di plastica, viti, bulloni e schede 
elettroniche, incapaci di rimontare. 
Anche la cartuccia è stata oggetto di in¬ 
dagine e bisogna dire che rimosse le 
due viti che tengono serrata la scocca, 
si accede ad una basetta di vetronite 
doppia faccia con disseminati 5 inte¬ 
grati di produzione Sharp e Mithsubi- 
schi, (in particolare fa bella mostra di 
se un LH233107). 


Il Wizard per il Commodore 64 

Rispetto al precedente MSX Wizard, il 
modello in questione presenta nella 
confezione una scheda di interfaccia¬ 
mento con la User Port del Commodore 
64 ed il software di gestione su floppy 
disk. 


Aperta la confezione le sorprese non 
sono poche sebbene la «carrozzeria» 
sia la medesima dell'altra versione. 


Una elettronica diversa 


Dopo aver proceduto a rimuovere an¬ 
che in questo caso la solita cupola tra¬ 
sparente, si scopre una netta differen¬ 
za della parte elettronica: in apparenza 
il circuito sembra più semplice ed in ef¬ 
fetti lo è, grazie al fatto che molte com¬ 
ponenti, essenziali per il corretto fun¬ 
zionamento, trovano posto sulla sche¬ 
da di interfacciamento di cui già si è 
detto. 

Con ciò si spiega il minor numero di IC 
presenti nel «cervello» del robot, limi¬ 
tati, nella parte visibile, al numero di 
tre. tutti di produzione NEC e tutti ugua¬ 
li (per l'esattezza dei D4011BC). 

Le sorprese non terminano qui: il cir¬ 
cuito stampato è realizzato con una ap¬ 
parente minor cura, dovuta probabil¬ 


mente al fatto che il campione pervenu¬ 
toci appartiene ad una preserie-prototi¬ 
po suscettibile di miglioramenti. 

In particolare il supporto è di normale 
bachelite e le piste del circuito non so¬ 
no, come nel caso precedente, rivestite 
della vernice epossidica verde di pro¬ 
tezione, ma ostentano crudamente il 
rame. 

Anche una volta aperta la cartuccia di 
programmazione ci si rende conto che 
l’impostazione circuitale è notevolmen¬ 
te diversa rispetto alla versione MSX: 
la scheda di bachelite con circuiti di¬ 
sposti su una sola faccia, ottenuta per 
immersione in bagno di stagno, mostra 
una manciata di componenti e due inte¬ 
grati di produzione Toshiba, un TC 
5517BPL-20 ed un TC 4040BP. 


La scheda di interfacciamento presen¬ 
ta invece pochi elementi che evidente¬ 
mente servono solo a poter permettere 
la comunicazione con il VIA, di cui è 
dotato il Commodore 64, ed a gestire 
gli Interrupt nella maniera più adegua¬ 
ta al funzionamento del Wizard. 
Probabilmente l'esigenza di dotare 
questa versione di una ulteriore sche¬ 
da di interfacciamento, è dovuta più al 
fatto che in tal modo si evita di dover ri¬ 
progettare e quindi cambiare la forma 
e le dimensioni della cartuccia, piutto¬ 
sto che per motivi strettamente elettro¬ 
nici. 


La programmazione 

Dobbiamo dire che siamo rimasti colpi¬ 
ti dalle possibilità offerte da questo mo¬ 
dello del Wizard. 

Innanzitutto dal punto di vista meccani¬ 
co ed elettrico la versione per il Com¬ 
modore 64 offre alcune caratteristiche 


in più: la prima di esse è la possibilità 
di poter usufruire anche della «retro¬ 
marcia»; la seconda consiste nel fatto 
che, contrariamente agli altri modelli 
del Wizard, per cambiare direzione 
(per girare ad esempio a destra) invece 
che bloccare il cingolo di destra e far 
girare solo il cingolo di sinistra, si in¬ 
verte il senso di rotazione del cingolo 
di destra rispetto a quello di sinistra. 
Questa caratteristica permette al robot 
di compiere dei percorsi molto più pre¬ 
cisi rispetto a quanto ci siamo abituati a 
vedere con il modello MSX. 

La programmazione avviene grazie al 
software contenuto sul dischetto, com¬ 
prendente due diversi editor: uno più 
semplice ed un altro più complesso che 
ricalca maggiormente il programma 
della versione MSX. 

In questo caso i comandi sono indicati 
con le lettere corrispondenti alle inizia¬ 
li dei movimenti: (F)orward, (B)ac- 
kward, (L)eft, (R)ight, ecc. 

In più è possibile registrare su disco 
determinate sequenze già realizzate, 
per poi richiamarle al momento oppor¬ 
tuno. Questa caratteristica rende il ro¬ 
bot molto più versatile. 


Conclusioni 


Essendo aumentata «l'intelligenza» si 
può pensare di poter fare del Wizard un 
uso più pratico e meno giocoso: non 
pensiamo certo di farci portare il caffè 
dalla cucina alla stanza da letto, ma al¬ 
meno per esigenze di spettacolo è pos¬ 
sibile fargli compiere delle evoluzioni 
più complesse e «rischiose» che non in 
precedenza. 

In definitiva si può affermare che que¬ 
sta ulteriore evoluzione del Wizard in 
versione per Commodore 64, dopo un 
iniziale principio di delusione dovuto 
alla realizzazione, per certi aspetti 
molto meno curata, è in realtà molto 
più versatile ed efficiente, dimostrazio¬ 
ne evidente del continuo miglioramen¬ 
to tecnico che accompagna l’evoluzio¬ 
ne dei prodotti MOVIT. 

Siamo anche sicuri del fatto che la mi¬ 
nore accuratezza dei particolari è do¬ 
vuta, come già detto, al fatto che ne è 
da poco iniziata la produzione e, di 
conseguenza, il processo produttivo 
non è stato ancora perfettamente otti¬ 
mizzato. Non rimane che attendere gli 
sviluppi che questo relativamente gio¬ 
vane campo di applicazione dell'elet¬ 
tronica, la robotica, ci riserva nei pros¬ 
simi anni: per il momento il modo giu¬ 
sto per non trovarci impreparati a que¬ 
sta rivoluzione, è il prendere confiden¬ 
za con oggetti come questo che, nono¬ 
stante l'aspetto quasi di giocattoli, in 
realtà riescono già a stupire per le loro 
non indifferenti caratteristiche tecni¬ 
che. 

Massimo Truscelli 
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Q uel genio multiforme che si 

chiamava Leonardo aveva già 
pensato all’elicottero sul finire 
del 1400. Leonardo aveva ideato 
la vite aerea dopo aver impostato le 
sue ricerche tecniche sul volo degli 
uccelli. Il merito di Leonardo è quello di 
avere fatto a pezzi un mito fantastico: 
quello secondo il quale l’uomo avrebbe 
potuto volare solo con un paio d'ali 
addosso. 

La vite aerea di Leonardo, infatti, non 
ha alcun riscontro in natura. La sua 
macchina, in tela di lino con una 
armatura di canne e di filo di ferro, 
avrebbe dovuto essere alta circa 
cinque metri. Quattro uomini 
avrebbero dovuto imprimerle il 
movimento necessario per ruotare 
nell’aria generando un movimento 
ascensionale. L’idea di Leonardo era 
impraticabile ma anticipava, e di molto, 
il principio sul quale si basano l’elica 
dell’aeroplano e l’elicottero. 

In principio l’elicottero fu solo una 
curiosità. A far alzare una vite aerea ci 
provarono in molti. I francesi Launay a 
Bienvenu fecero volare nel 1784, in una 
sala della Accademia delle Scienze di 
Parigi, un modellino con un dispositivo 
ad eliche controrotanti. In questo modo 
i due scienziati francesi erano riusciti a 
risolvere il difficile problema 
aerodinamico dell’elicottero. La 
rotazione dell’elica, mossa dal motore, 
infatti, provoca nella macchina la 
tendenza a ruotare in senso opposto 
secondo il principio dinamico di azione 
e reazione. 

Un italiano, Enrico Forlanini, noto per 
le sue ricerche su aliscafi e dirigibili, 
costruì nel 1877, un grande modello di 
elicottero. Per farlo volare impiegò un 
motore a vapore e riusci, per un paio di 
volte, a far alzare la sua macchina 
anche se per pochi secondi e per pochi 


di Giuseppe B revegli eri 

metri d’altezza. 

Anche i fratelli avevano pensato 
all’elicottero ma il successo del loro 
aereo ad ala fissa li distolse dal 
progetto e li condusse su strade 
diverse. Nel 1907 altri due francesi, 
Breguet e Cornu, riescono a far 
sollevare alcuni apparecchi ad ala 
rotante. Nel 1923, uno spagnolo dal 
nome lunghissimo, Juan De la Cierva y 
Codornio, mette a punto un autogiro, 
un piccolo elicottero monoposto con il 
quale, cinque anni dopo, attraversa la 
Manica. Più tardi, dell’autogiro di 
Codornio, si impossessano i militari — 
tedeschi e britannici — e lo 
impiegarono per usi bellici; i tedeschi 
ne avevano addirittura piazzati alcuni 
sui loro sottomarini: quando lo scafo 
emergeva dalle profondità del mare 
l’autogiro si alzava per alcune 
centinaia di metri e il pilota, con una 
linea telefonica comunicava 
all’equipaggio i dati della sua 
esplorazione aerea. Nel 1930 un altro 
italiano, D’Ascanio, progetta e 
costruisce un elicottero sperimentale 
per l’Aeronautica di casa nostra e batte 
tutti i primati internazionali. Ma il primo 
elicottero davvero operativo è quello di 
un professore tedesco politicamente 
sospetto ai nazisti che si chiama 
Heinrich Foche. Foche era stato messo 
in disparte nella sua stessa azienda, la 
Foche-Wulf, ma riuscì egualmente a far 
volare l’Fa-61 che può essere 
considerato il primo vero elicottero. 
Altro personaggio importante nella 
storia di questa macchina è il russo 
Sikorski che perfezionò l’elicottero e 
nel 1939 mise a punto il VS-300 che 
riassumeva tutte le caratteristiche 
dell’elicottero moderno. 

Ma è a partire dal 1942 che l’elicottero 
si afferma come un mezzo 


indispensabile per volare. Dimostra 
subito la sua utilità come mezzo di 
soccorso nel 1944 quando la Guardia 
Costiera americana, con un elicottero 
sperimentale 180CV, vola in mezzo ad 
una bufera di neve per portare plasma 
alle vittime di un incendio su un cargo 
in alto mare. Poi, nel 1945, due marinai 
abbandonati su una nave alla deriva al 
largo di New York vengono salvati da 
un elicottero dopo 16 ore drammatiche 
di tentativi. Nel ’58 è ancora un 
elicottero che strappa a morte certa 
due controllori di volo bloccati da un 
incendio sulla torre di controllo 
dell’aeroporto di Bruxelles, alta una 
cinquantina di metri. 

Oggi questi interventi di salvataggio, 
grazie all’elicottero, vengono 
considerati operazioni comuni. 

Persone isolate, sciatorfe alpinisti 
infortunati, passeggeri scampati a 
disastri aerei, devono la loro salvezza 
all’idea di Leonardo. 

Anche i militari hanno impiegato 
spesso l’elicottero per la sua duttilità. 
La Corea, il Vietnam, l’Afghanistan, 
hanno trasformato un mezzo nato 
soprattutto per salvare la gente, in una 
terribile macchina da guerra. Ma, 
sostengono gli specialisti, cosi come 
accade in campo automobilistico dove 
la tecnologia sofisticata della Formula 

I viene poi trasferita nelle auto di serie, 
anche gli elicotteri impiegati per usi 
civili si avvalgono della tecnologia 
studiata per le macchine militari. 

In italia esiste una buona industria 
elicotteristica; una delle migliori del 
mondo. È il gruppo Augusta che 
produce elicotteri aeroplani e sistemi. 

II gruppo è quarto a livello mondiale e 
primo in Europa. 

Dal 1952, data di inizio della 
produzione di elicotteri, sia pure su 
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licenza, l’industria di Cascina Costa ha 
raggiunto un livello tecnologico molto 
alto. Nel 1971 vola per la prima volta l’A 
109, un elicottero biturbina leggero, a 
sette posti, progettato e costruito 
interamente in Italia. Il gruppo Augusta 
continua la produzione di elicotteri su 
licenza statunitense — macchine in 
parte modificate autonomamente e che 
hanno ancora buone prospettive di 
mercato — ma ha come obiettivo 
primario l’ampliamento delle 
collaborazioni internazionali. Questo 
tipo di strategia è una sorta di percorso 
obbligato per l'industria elicotteristica 
di casa nostra che, come tutte le 
industrie del settore nel mondo, deve 
fare fronte agli alti costi di sviluppo. 

Per questo l’Augusta ha trovato 
un’intesa con la Westland britannica. 
L'A 109 Augusta, come dicono gli 
esperti, è un elicottero che rappresenta 
il concetto di «famiglia» di macchine, 
un concetto che sta alla base della 
moderna impostazione produttiva in 
questo particolare settore. In sostanza 
ciò vuol dire che da una macchina base 
vengono progettate e prodotte versioni 
diverse che si differenziano dal 
modello originale per l’uso alle quali 
sono destinate. Nel caso dell'A 109 dal 
progetto originale sono stati derivati la 
versione militare, quella per la 
sorveglianza delle coste, per il 
soccorso in mare, la versione sanitaria 
e quella per il trasporto merci. 

La versione sanitaria, l’eliambulanza A 
109 MK II, ha dimostrato ancora una 
volta la versatilità d'impiego di questo 
mezzo di soccorso e ha rivoluzionato il 
concetto di trasporto sanitario. La 
Regione Lazio ha, di recente, 
approvato una legge per l’impiego 
dell’elicottero nel soccorso d'urgenza 


e molte altre Regioni italiane lo stanno 
facendo. La versione sanitaria di 
questa macchina permette di prestare 
già a bordo le prime cure e 
comunicare, in volo verso l'ospedale, i 
dati riguardanti l’incidente e 
l’infortunato per predisporre gli 
interventi necessari. 

Questo elicottero è, dunque, un buon 
esempio d’integrazione tra una 
tecnologia aeronautica avanzata e 
sofisticate applicazioni mediche. La 
validità del mezzo è dimostrato, in 
pratica, dal fatto che dalla richiesta di 
soccorso alla partenza dell'elicottero 
non sono mai trascorsi più di 5 minuti 
e, in un caso, un grosso incidente 
sull’Aurelia con due infortunati gravi, i 
feriti sono stati portati in ospedale in 8 
minuti soltanto. Tra non molto, 
l’eliambulanza sarà in grado di 
operare 24 ore su 24, anche in 
condizioni atmosferiche avverse con 
un nuovo sistema di visione notturna in 
fase di sviluppo avanzato che la 
Divisione sistemi dell’Augusta ha 
messo a punto. Adesso l’Augusta sta 
collaborando alla realizzazione della 
versione sanitaria del CH 47 
«CHINOOK» uno degli elicotteri più 
grandi tra quelli esistenti. Il 
«CHINOOK» diventerà un vero 
ospedale volante; è stato diviso in tre 
sezioni; sala operatoria con la 
strumentazione per anestesia, indagini 
radiologiche ed elettrocardiogrammi, 
rianimazione con defribrillatore e 
respiratore automatico, e infine un 
laboratorio per terapie intensive. 

Gli impegni di collaborazione 
internazionale dell'Augusta hanno già 
un concreto risultato nell'EH 101 un 
elicottero antisom che entrerà in 
produzione alla fine del 1986. Questo 


elicottero è stato adottato dalla marina 
militare italiana e da quella britannica. 
La versione civile dell’EH 101 verrà 
impiegata nel trasporto passeggeri e 
nel trasporto misto. 

Un altro programma di collaborazione 
internazionale è quello legato allo 
sviluppo dell'NH 90, un elicottero per la 
NATO che viene portato avanti da un 
consorzio di cui fanno parte Italia, 
Francia, Gran Bretagna, Germania e 
Olanda. Dell’NH 90, l’Augusta è, con la 
francese Aerospatiale, capoprogetto. 

La nostra industria elicotteristica, 
dunque, è all’avanguardia nel settore 
ed il suo impegno per lo sviluppo in 
nuove aree tecnologiche trova 
riscontro nella Divisione Sistemi 
dell'Augusta che opera nei campi 
dell’elettro-ottica, dei computers di 
bordo, della simulazione, degli 
equipaggiamenti, della 
fotogrammetria, della fusione e dei 
materiali compositi. I sistemi avionici, 
il complesso della strumentazione 
elettronica installata sugli aeromobili 
civili o militari, concorrono per 1/4 nel 
settore civile degli elicotteri a formare 
il prezzo di vendita di ogni macchina. 
Questa tendenza è destinata ad 
aumentare perché sul mercato 
entreranno aeromobili dotati di sistemi 
avionici molto sofisticati per governare 
particolari funzioni del volo, come 
l'assetto, la propulsione, e la 
comunicazione. Questi sistemi saranno 
sempre più integrati e flessibili con 
l’evoluzione delle tecniche digitali più 
avanzate. A questo settore, quindi, 
l'industria italiana che si occupa di 
avionica, guarda con molta attenzione 
per la possibilità di mercato, 
soprattutto nelle applicazioni civili, ed 
anche per le possibilità legate 
all’occupazione. □ 
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CCOICE TITOLO PROGRAMMA LIST No PREZZO NOTE 


COmOOORE 64 












C6401N-0 

C640ZN-0 


GEOMETRIA 1 
DESIGN LAB 


CCMMOOORE 16 


8-9/1985 8000-10000 
10-11/ 1985 8000-1DODO 


:**# 


C1601N-0 

C1602N-0 


SATLRN 16 
CHIMICA 


SEGA SC 3000 


10-11/1985 8000-10000 
10-11/1985 SODO-1ODDO 


:##* 
: ### 


SC301N 

SC30ZN 

SC303N 

MATH SOFTWARE 

IL BOSCO MALEDETTO 
GEOMETRIA 1 

8-9/1985 

10-11/1985 

10-11/1985 

8000 : 

8000 : 

8000 ; 

SHARP MZ 700 

MZ701N 

MZ702N 

MZ703N 

BIGLIETTI DA VISITA 
ELENCO FORNITORI 
SETTE E PEZZO 

8-9/1985 

10-11/1985 

10-11/1985 

8000 

8000 : 

8000 : 


TEXAS TI 99/4A 



TI901N 

TI902N 

SCHEDA P. MONDRIAN 

LA COMETA HALLEY 

8-9/1985 

10-11/1985 

8000 : 

8000 : 


TOSHIBA HX 10 MSX 



*EX01N 

MSXOZN 

MSX03N 

MSX04N 

M5X SPRJTE 

POKER 

PIANTE FABBRICATI 
GALACTICA 

8-9/1985 

8-9/1985 

10-11/1985 

10-11/1985 

SODO 

8000 = 

8000 •« 

8000 i 

»** NELLA VERSIONE SU FLOPPY DI3< IL PREZZO 
L'LLTIMA LETTERA DEL CODICE E' <N> PER I 

SALE A LIRE 10000. 

NASTRI E <D> PER I 


FLOPPY DISKs. 

N.B'. 1 PREZZI SI INTENDONO COMPRENSIVI DI SPESE POSTALI E CON 
SPEDIZIONE IN CONTRASSEGNO. 






























































C64 

DESIGN LAB 

Come realizzare al computer 
figure geometriche tridimensionali 


©s 

MEDIA Tempo 
DIFFICOLTÀ diesecuzione 

3 ORE 


.ijljl I programma presen- 

ìjjj; tato nelle pagine se¬ 
llili guenti permette inve¬ 
ce, grazie all'inserimento 
dei singoli dati da tastiera, di 
ottenere solidi 3D estrema- 
mente precisi. 

Per disegnare con il «DESI¬ 
GN LAB», si deve ricordare 
che il disegno in alta risolu¬ 
zione è attuabile controllan¬ 
do individualmente ogni Plc- 
ture ELement (PIXEL) con il 
classico metodo delle 
«Coordinate Cartesiane (X, 
Y)» in un sistema di riferi¬ 
mento rappresentato, in 
questo caso, dallo schermo 
televisivo. 

Un particolare di grande im¬ 
portanza per le applicazioni 
legate all'uso domestico del¬ 
la Computer Graphic, è che 
l'origine del sistema di rife¬ 
rimento, e cioè il punto di 
coordinate (0.0), corrispon¬ 
de all'angolo superiore sini¬ 
stro del teleschermo e che, 
aH’aumentare dei valori di X, 
un ipotetico «cursore» si 
sposta verso destra sull'as¬ 
se delle ascisse, cosi come 
lo stesso «cursore» si sposta 
in basso all'aumentare dei 
valori dell'Ordinata Y. 

Nel nostro programma, pre¬ 
sentato in versione adatta al 
Commodore 64 in configura¬ 
zione espansa con SIMON'S 
BASIC, la risoluzione, cioè il 
numero massimo di punti in- 
dirizzabili sul tubo a raggi 
catodici, è di 320 per l'asse X 
e 200 per l'asse Y, per un to¬ 
tale di 64000 punti. 

Come accennato poco prima 
si è preferito elaborare il 
programma con l'ausilio di 
un TOOL di comandi per due 
motivi fondamentali: il primo 
è che in tal modo si può fare 


a meno di ricorrere a com¬ 
plicate e «macchinose» rou- 
tines in Linguaggio Macchi¬ 
na per la gestione dello 
schermo in alta risoluzione; 
il secondo motivo è che gra¬ 
zie all'istruzione LINE i tem¬ 
pi per la visualizzazione del¬ 
le figure, sono notevolmente 
ridotti rispetto ad una routi¬ 
ne di PLOT ottenuta in L.M. 
Prima di passare ad un esa¬ 
me più approfondito del pro¬ 
gramma, è bene dare qual¬ 
che indicazione in merito al 
disegno tradizionale ed agli 
elementi basilari per la rap¬ 


presentazione in Computer 
Graphic. 

Innanzitutto bisogna ricorda¬ 
re che il disegno è una for¬ 
ma di astrazione mentale, o 
per meglio dire: «... Una se¬ 
rie di segni grafici e quindi 
bidimensionali (2D) che per¬ 
mette di ricostruire, a livello 
di semplice percezione visi¬ 
va. un fatto spaziale tridi¬ 
mensionale (3D) consenten¬ 
do, come nel caso della geo¬ 
metria descrittiva, di rico¬ 
struire successivamente a 
distanza di tempo e spazio, 
gli enti che compongono il 


disegno, la loro collocazione 
spaziale e le loro misure 
(angoli, lunghezze, supera¬ 
ci), altrimenti eseguibili solo 
direttamente sull’oggetto 
reale». 

Sin dai tempi più antichi, tutti 
gli uomini d'ingegno si sono 
sforzati di riuscire a tradurre 
in modo sistematico e scien¬ 
tifico tutte le forme del dise¬ 
gno in operazioni matemati¬ 
che più o meno complesse. 
Oggi grazie a questi «Signo¬ 
ri» non abbiamo problemi a 
disegnare un cerchio cono¬ 
scendone il raggio, né a mi- 


A (125.60) 

B (135,70) 

C (115,90) 

I) (105,80) 

K (120,50) 

H (160,90) 

<1 (130,120) 
H (90,80) 

I (120,100) 
1. (160,140) 
M (130,170) 
N (90,130) 


Al 

B1 

c:i 

di 


( 125 *Tx,6Q*T y) 
( 135*1 x,70fl» 
( 115*Tx,90*Ty) 
( 105* l’x,80*Ty) 



Pi*. 2 


Figura 2 
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di M. Truscelli 



surare anche senza dise¬ 
gno, analiticamente, quanto 
è lunga la diagonale di un 
rettangolo i cui lati siano a e 
b grazie alla seguente sem¬ 
plice espressione: 

SQR(A|2+ Bf2) = D- diago¬ 
nale 

Purtroppo non ci si rende 
conto che tutte le forme esi¬ 
stenti in natura e quindi in 
tutti gli artifizi usati per ri- 
trarla, possono tranquilla¬ 
mente essere sostituite da 
espressioni matematiche; la 
grafica computerizzata pone 
le sue basi su questo concet¬ 
to particolarmente importan¬ 
te. 

Il metodo più usato per «co¬ 
dificare» delle figure geome¬ 
triche in termini comprensi¬ 
bili dal computer si avvale 
dell’uso della geometria ma¬ 
triciale: ogni punto di un pia¬ 
no, se usiamo un poco di 
fantasia potrebbe essere lo 
schermo televisivo, può es¬ 
sere efficacemente reso in 
forma matematica grazie al¬ 
l’uso di una matrice di una 
riga per due colonne. 

Si comprende bene che una 
figura chiusa o aperta, com¬ 
posta da N punti può essere 
compresa in una matrice di 
N righe per due colonne. 
Procedendo in tal modo è 
possibile trasformare ogni 
disegno in dati utili da me¬ 
morizzare su un qualsiasi 
supporto, dati che possono 
essere poi richiamati nel 
momento in cui sarà neces¬ 
sario farne uso. 

In DESIGN LAB si è elimina¬ 
to il primo passo, riguardan¬ 
te la trasformazione di un 
oggetto 3D in una rappre¬ 
sentazione sul piano 2D per¬ 
ché l'esaurimento della trat¬ 
tazione di un simile argo¬ 
mento avrebbe richiesto una 
quantità di tempo e spazio 
da non poter essere compre¬ 
so nelle pagine di questa ri¬ 
vista. Lasciamo dunque que¬ 
sta fase del procedimento 
alla «fantasia» e capacità di 
tutti coloro che si occupano, 
per divertimento o per lavo¬ 
ro, di questi problemi; in 
ogni caso più avanti trovere¬ 
te una piccola facilitazione 
per la trasformazione dei 


punti che designano gli ele¬ 
menti delle figure, in coordi¬ 
nate cartesiane da introdur¬ 
re nel computer in fase di IN¬ 
PUT. 

Tornando alle nostre matrici 
— si fa per dire! — è possi¬ 
bile, grazie alle proprietà 
della moltiplicazione tra ma¬ 
trici, operare diversi tipi di 
trasformazione. 

Ad esempio (x,y) sono le 
coordinate iniziali di un pun¬ 
to, e (xl.yl) le coordinate fi¬ 
nali, cioè: 
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a b 


<x,y> * 


= (xl,yl) 


c d 


e quindi 

a b 


<x ,y ) * 


= t(ax+cy)#(bx+dy )] 


c d 



Una delle peculiarità riguar¬ 
danti le trasformazioni me¬ 
diante la moltiplicazione di 
matrici consiste nel fatto che 
rimangono invariate le coor¬ 
dinate dell’origine: 

▼ 


< 0 , 0 > * 

Variando gli elementi a, b, c, 
d contenuti nella matrice si 
otterranno vari tipi di tra¬ 
sformazione: 

▼ 


Ciò permette di poter far 
eseguire delle rotazioni in¬ 
torno all'origine; per il mo¬ 
mento fermiamoci però al¬ 
l’unico tipo di trasformazio¬ 
ne implementato in DESIGN 
LAB, e cioè la Traslazione. 

In geometria si definisce 
«Traslazione di una figura» 
lo spostamento rigido della 
figura che ne lasci inalterato 
l'orientamento rispetto al si¬ 
stema di riferimento (FIG. 1). 
In una traslazione tutti i punti 
della figura subiscono un 
medesimo spostamento. 
Dato il segmento~AB di coor¬ 
dinate iniziali (x0,y0), il seg¬ 
mento traslato A1B1 si ottie¬ 
ne applicando una traslazio- 


a 0 

0 1 
1 0 

0 d 
a 0 

0 d 


■trasla un punto sull’asse x; 


■trasla un punto sull'asse y ! 


trasla un punto sull’asse x 
e sull' asse y. 
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ne Tx al segmento AB ed 
una successiva trasl azione 
Ty al segmento A2B2 prece¬ 
dentemente ottenuto. 

Le formule generali della 
traslazione sono: 
xt = xO + Tx con—00 X Tx X00 
yt = yO + Ty con—00 X Ty X00 

IL PROGRAMMA 

Dopo aver avviato il pro¬ 
gramma la prima cosa ad 
essere visualizzata è un Me¬ 
nù che prevede le seguenti 
opzioni: 

1) Coordinate 

2) Caricamento dati 

3) Registrazione dati 

4) Visualizzazione 

5) Traslazione 

6) Menù 

7) Fine lavoro 

Supponiamo di voler dise¬ 
gnare un oggetto come quel¬ 
lo mostrato dalla figura 2. 
Esso è composto da un soli¬ 
do a forma di parallelepipe¬ 
do con due «finestre», di 
uguali dimensioni, sulla fac¬ 
cia superiore. Selezionando 
l'opzione 1 si inizia la fase di 
INPUT dei dati utili per la vi¬ 
sualizzazione e/o la conser¬ 
vazione della figura deside¬ 
rata. 

Sullo schermo apparirà l'in¬ 
dicazione riguardante il 
massimo delle figure dise¬ 
gnatali ed il numero di verti¬ 
ci massimo per ogni figura 
(20 figure/12 vertici per ogni 
figura) e successivamente il 
numero delle figure a due di¬ 
mensioni. 

Per facilitarvi nel lavoro di 
DEBUG (spulciamento) del 
programma, e soprattutto se 
non siete degli «artisti», vi 
consigliamo di seguire nel¬ 
l'introduzione dei dati le in¬ 
dicazioni dell'esempio di fig. 
2 . 

Alla domanda posta prece¬ 
dentemente dovrete rispon¬ 
dere che le figure a due di¬ 
mensioni da disegnare sono 
due, quindi non dovrete far 
altro che rispondere di volta 
in volta alle varie domande 


che vi verranno poste indi¬ 
cando, rifacendoci sempre 
al caso specifico, 4 alla ri¬ 
chiesta del numero di punti e 
(S) alla richiesta di figura 
chiusa o aperta. 

Superata questa prima fase 
di generale indicazione sul 
tipo di figura che il computer 
dovrà riprodurre, vi saranno 
richieste per ogni figura le 
coordinate cartesiane dei 
vertici, nel nostro caso: 

X,Y (RETURN) 125,60 
X.Y (RETURN) 135,70 
X,Y (RETURN) 115,90 
X.Y (RETURN) 105,80 

A questo punto, approfit¬ 
tando dei concetti sulla tra¬ 
slazione precedentemente 
menzionati, si può ricorre¬ 
re ad essa rispondendo al¬ 
la successiva domanda 
(COPIA ULTIMA PARTE) 
schiacciando il tasto (S). 

Vi sarà quindi richiesto il 
«coefficiente di traslazione» 
che nel nostro caso (vedi 
FIG. 2), è uguale a 15 sia per 
l'asse orizzontale che per 
quello verticale. 

Alla domanda riguardante 
l’appartenenza della figura 
2D al solido 3D si dovrà ri¬ 
spondere con (N). 

Inizia a questo punto la fase 
riguardante i disegni a tre 
dimensioni (3D). 

Il procedimento è analogo al 
precedente, ma bisogna 
avere l'accortezza, per ogni 
solido, di indicare adeguata- 
mente i vertici di due faccie 
opposte della figura seguen¬ 
do lo stesso ordine di INPUT 
per entrambe. 

Sembra una cosa «dell’altro 
mondo», ma in realtà è più 
semplice a farsi che a dirsi: 
vediamo dunque qual è la 
procedura da seguire. 

La prima faccia della figura 
che vogliamo disegnare è 
delimitata dai punti E, F, G, 
H; la seconda dai punti I, L, 
M, N (vedi fig. 2). 

Procediamo nel modo se¬ 
guente: 


FACCIA 1 

X.Y (RETURN) 120,50 
X,Y (RETURN) 160,90 
X,Y (RETURN) 130,120 
X.Y (RETURN) 90,80 

Questo è quanto riguarda la 
prima faccia del solido. Fa¬ 
cendo attenzione si potrà 
notare che l’INPUT dei dati 
inizia per la prima faccia dal 
punto più alto procedendo 
quindi in senso orario. 

La stessa procedura dovrà 
essere seguita per la faccia 
2: il primo vertice da indica¬ 
re dovrà essere quello corri¬ 
spondente al primo della 
faccia precedente e poi si 
dovrà proseguire con lo 
stesso ordine adottato pre¬ 
cedentemente. 

PAPPI A O 

X.Y (RETURN) 120,100 
X,Y (RETURN) 160,140 
X.Y (RETURN) 130,170 
X,Y (RETURN) 90,130 

Se osservate il disegno della 
figura 2, e nel contempo 
analizzate attentamente l'IN- 
PUT riguardante le due fac¬ 
ce, vi renderete conto più 
facilmente del concetto 
espresso. 

Alla fine della procedura 
COORDINATE, battendo RE¬ 
TURN, il programma vi ri¬ 
proporrà la pagina riguar¬ 
dante il Menù per la scelta di 
altre opzioni. Logicamente, 
per naturale curiosità, vi 
verrà istintivo visualizzare 
la figura sullo schermo; per 
far ciò sarà sufficiente pre¬ 
mere il tasto corrispondente 
all'opzione VISUALIZZAZIO¬ 
NE 

Passiamo ad esaminare le 
altre opzioni disponibili nel 
Menù del programma. 
TRASLAZIONE 
Di questo procedimento si è 
già largamente discusso e ci 
sembra superfluo quindi di¬ 
lungarci in ulteriori spiega¬ 
zioni; ci limitiamo a dire che 
selezionando questa opzio¬ 
ne, dopo aver già creato una 
figura, bidimensionale o tri¬ 


dimensionale che sia, que¬ 
sta può essere «spostata» 
da una posizione all’altra 
dello schermo, senza che 
subisca alterazioni di sorta. 
Le altre due opzioni signifi¬ 
cative — CARICAMENTO E 
REGISTRAZIONE DATI — 
come comprensibile dalle 
diciture, permettono di im¬ 
magazzinare i dati e le figu¬ 
re su di un floppy-disk e di ri¬ 
chiamarle al momento op¬ 
portuno evitando di dover 
reintrodurre tutti i dati con la 
procedura COORDINATE 
Infine vi segnaliamo alcuni 
piccoli trucchi che potrete 
usare in situazioni partico¬ 
larmente «difficili». 

Il programma è concepito 
per disegnare i solidi in ma¬ 
niera tale che risultino «tra¬ 
sparenti»: se fosse necessa¬ 
rio disegnare un solido di cui 
non volete che una faccia sia 
vista in trasparenza, potrete 
semplicemente ricorrere al 
«trucco» di trasformare la fi¬ 
gura 3D in più figure 2D. 
Tornando al nostro solito 
esempio di fig. 2, se volete 
far vedere solo le tre facce 
contrassegnate nel seguen¬ 
te modo: 

FACCIA 1 = E-F-G-H 
FACCIA 2 = F-G-M-L 
FACCIA 3 = H-G-M-N 

non dovrete far altro che di¬ 
segnare e quindi fornire i 
dati delle singole tre figure a 
due dimensioni, che una vol¬ 
ta visualizzate vi daranno 
l’immagine di un solido 3D 
non trasparente. 

Il secondo consiglio riguarda 
il modo di creare i vostri di¬ 
segni. Cercate di realizzare 
una specie di piccola lava¬ 
gna su cui attaccherete un fo¬ 
glio di carta millimetrata del¬ 
le dimensioni di cm. 32x20. 

In tal modo i vostri disegni 
saranno già in scala e ad 
ogni posizione dei vertici del¬ 
la figura corrisponderanno 
già le relative coordinate car¬ 
tesiane. 


10 PIMfK20.2.26) 60 PRIHTTRBC 12>"325 ERPICAMENTO DATISI" 

20 X$="" 70 PRINTTAB<12>"3135 REGISTRAZIONE DATISI" 

30 PRINT'TV." ^ COLOURO, 0 : HI PESI, 0 : CSET1 

40 PRINTRT < 12,0 V’ 3 —#-, I / #1*1 -• r/ SPOTSM* ' R0 PRINTTAB < 12 ) "3W5 VI SUAL IZZAZ10NESJP ' 

90 PRINTTAB<12)"SJ55 TRASLAZI ONEST 

50 PRINTTAB<12) "315 COORDINATESI" 100 PRINTTAB<12)"flSS MENU "SI" 
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110 PRINURBO2V’ara FINE LfiVOROW* 

120 GOSUB3700 

130 GP=VfìL<X*>: IFGP<1OPGP>7THENO0T030 
140 ONGPG0TO1190.3000.32™ • 1 670 . 2700. 30 , 
3740 

150 GOTO30 
400 0010400 
1190 PRINT "3" 

1200 PRINT"\fìX. 20 PfìRTI - 12 PUNTI PER 
PRRTE" : PRINT 

1210 INPUT"# fì 2 DIMENSIONI": PI 
1220 PA=Pl+2 : X$="" : fì<0, 0..0 :• =Pl 
1230 IFP1=0THEN1410 
1240 FORPT=2T0Pl + l 
1250 PRINT'TFARTE'‘;PT-1 
1260 IFPT=2THEN1320 

1270 PRINT'’—QPIfì ULTIMA PARTE <S/N.V':GOS 
IIE3700 

1230 IFX$="N* THEN1320 

1290 : 

1300 GOSUB2430 
1310 GOTO1390 

1320 INPUT"/O DI PUNTI";PO 

1330 PRINT"FIG. CHIUSA < S/N ) "’ROSI IB3700 

1340 I FX$= ' *S ‘ THENA < PT, 0, 1 > = 1 : ROTO ì 360 

1350 fì<PT, 0,0=2 

1360 A<PT,0,0)=PO 

1370 TA=2 

1 3S0 F0RT=2TOP0+1 :1NPIJT' ’X, V' ' ; fì < PT . 0 . Tfì) . 
A < PT, 0 .. TA+ 1.) : Tfì-TA+2 : NEXT 
1390 NEXTPT 
1400 PRINT'Tl" 

1410 INPUT"# A 3 DIMENSIONI":P2 
1420 IFP2=0THENA<1,0,0 > =0 :GOTO30 
1430 X$="":fì<l,0,0)=P2 
1440 FORPT=PAT0P2+Pfì-1 
1450 PPIHT'TPfìRTE".;PT-1 
1460 IF < PT=PA >THEN1510 

1470 PRINT"-OPIfì ULTIMA PARTE <S/N)":GOS 
UB37O0 

1430 IFX*="N"THEN1510 
1490 GOSUB2430 
1500 GOTO1630 

1510 PRINT"# DI PUNTI":INPUT"IN OGNI FAC 

cia"; po 

1520 : 

1530 A<PT.0.0>=PO 

1540 PRINT"—IG. CHIUSA <S/NV:GOSUB3700 

1550 IFX$= ' 'S ' THENA < PT,0,1> = 1 : GOTO1570 

1560 A<PT,0,1>=2 

1570 Tfì=2 

1580 F0RTT=1T02 

1590 PRINT"TFACCI A".: TT 

1600 F0RT=2T0P0+1: INPUT"X,V";fì<PT,TT,Tfì) 

,A<PT, TT, TA+1>:TA=Tfì+2:NEXT 

1610 TA=2 

1620 NEXTTT 

1630 NEXTPT 

1640 GOTO30 

1650 •’ 


1660 : 

1670 CSET2 
1630 •* 

1750 P1=A < 0,0.0 >:Pfì=PJ +? 

1760 IFP1=0THEN1900 
1770 F0RPT=2T0P1+1 
1730 PO=A<PT,0,0) 

1790 Tfì=2 

1800 F0RT=2T0P0+1 

1310 Xl=fì<PT.0,TA) : V1=fì < PT.0.Tfì+1> 

1320 : 

1830 IFT=P0+1ANDA < PT, 0, 0=1 THENX2=A < PT, 0 
, 2> : V2=A<PT,0,3) : GASI IB2160 
1340 IFT-P0+1THEN1390 
1350 X2=A < PT,0,Tfì+2>:V2=A<PT.0,TA+3 ) 

1360 G0SUB2160 
1870 Tfì=Tfì+2 
1380 NEXTT 
1390 NEXTPT 
1900 ' 

1910 P2=A<1,0,0) 

1920 IFP2=0THEN2340 
1930 FORPT=PAT0P2+PA-1 
1940 Pfì=fì<PT,0,0) 

1950 FQRTT=1T02 

I960 TA=2 

1970 F0RT=2TOP0+1 

1980 XI=fì<PT,TT,TA): V1=fì<PT,TT.Tfì+1) 

1990 IFT=PO+1ANDA <PT,0,1) = 1THENX2-A< PT.T 

T, 2):V2=fì< PT,TT,3):G0SUB2160 

2000 IFT=P0+1THEN2850 

2010 X2=A<PT,TT,Tfì+2):V?=A<PT,TT,Tfl+3) 

2020 GOSUB2160 

2030 Tfì=Tfl+2 

2040 NEXTT 

2050 NEXTTT 

2060 Tfì=2 

2070 F0RFA=1T0P0 

2080 Xl=fì<PT, 1,TA) :Vl=fì<PT, t,Tfì+D 
2090 X2=fì<PT,2,Tfì):V2=fì<PT.?.TA+1) 

2100 G0SUB2160 
2110 Tfì=TA+2 
2120 NEXTFA 
2130 NEXTPT 
2140 G0T0234O 
2150 : 

2160 GOSUB3500: RETURN 

2330 : 

2340 OOSUB3700 
2250 CSET2 :ROT020 
2420 : 

2430 PR INT ‘ TFARTE ’ 'PT-1 : PRI NT ’ ’]S1I 
,01" 


2440 PRINT" 

DESTRA = +X 

— — V * 1 

2450 PRINT" 

- -VTfl" 


GIU' = + V 


2460 INPUT"TRfìNS X";TX 

2470 INPUT"TTRfìNS V";TV 

2430 PRINT"*L-IG. A 3 DIMENSIONI S/N)"•'R 

OSUB3700 
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2430 J FXT= l 'S"THEN2590 

2560 fì < PT,0,n >=fì<PT-1,0,0 >: 0<PT,0,1> =fl <P 
T-1,0,1> 

2510 Tfl=2 

2520 FQRT-2TQfì<RT,0,0>+1 

2530 R<PT,0,TR >=fì<PT-1.0, fR> +TX 

2540 fì< PT,0,Tfì+1> -fì < PT-1,0,TR+1>+TV 

2550 Tfì-Tfì+2 

2560 NEXTT 

2570 PRI NT ' TT ' 

2580 RETURN 

2590 fì ( PT, 0,0> =fì<PT-1.0,0: fì<PT, 0, 1 > =fì<P 
T-1,0,1> 

2600 F0RTT=1TO2 
2610 Tfì-2 

2620 FnRT=2Tfìfì<PT.0,0> + i 

2630 fì<PT,TT,TR >=fì <PT-1,TT,Tfì>+TX 

2640 R<PT,TT,Tfì+1> =fì<PT-1,TT,TR+1> +TV 

2650 Tfì=Tfì+2 

2660 NEXTT 

2670 NEXTTT 

2680 FRI NT *73" 

2690 RETURN 
2700 : 

2710 PR INT 1 731 -*#L**-,r.-Ofl** 

2720 PRINT" DESTRA = +X SINISTRA 

= -X' 1 

2730 PRINT" GIU" = +V SU 

= -vr 

2740 INPUT*TRANS X"JTX 
2750 INPUT*'TTRfìNS V’UTV 
2760 Pl=A(0,0,0>:Pfì=Pl+2 
2770 F0RPT=2T0P1+1 
2780 PO=fì C PT, 0,0 ') 

2790 Tfì=2 

2800 F0RT=2TDP0+1 

2810 fì(PT,0,Tfì >-fì<PT,0,Tfì > +TX 

2820 A(PT,0,TA+1>=fì < PT,0,Tfì+1> +TV 

2830 Tfì=TA+2 

2840 NEXTT 

2850 NEXTPT 

2860 P2==fì<1,0,0> 

2870 FORPT=PfìTGP2+Pfì-1 
2880 P0=fì<PT,0,0) 

2890 FORTT=1T02 

2900 Tfì=2 

2910 FORT=2T0Pn+l 

2920 fì <PT,TT,Tfì >=fì <PT,TT,Tfì >+TX 

2930 fì(PT,TT,Tfì+1>=fì<PT,TT,TA+1>+TY 

2940 Tfì^Tfì+2 

2950 NEXTT 

2960 NEXTTT 

2970 NEXTPT 

2980 GRT030 

3000 PRINT‘7)5ARICfìMENTQ DATI DAL DRIVE:* 

3010 INPUT*'NOME FILE’UF* 

3020 0PEN2,8,2 ■ "0 : "+F$+", SEQ, READ" 

3025 RT-CHRf(13> 

3030 INPUT#2,fì <9,0,0 >,fì<1,0,0 > 


3040 F0RPT=2T0fì<0,0,0>+l 
3050 Tfì=2 

3060 INPUT#2,fì <PT,0,0>,fì < PT,0,1> 

3070 FORT= 1TOA < PT .0.0 +1 

3080 INPUT#2,fì< PT,0,Tfì >,fì <PT,0,Tfì+1> 

3090 Tfì=Tfì+2 
3100 NEXTT 
3110 NEXTPT 

3120 FQRPT=fì ( 0,0, 0 +2T0A < 1,0,0 :■ +fì < 0,0,0 
+ 1 

3130 INPUT#2,fì<PT,0,0>,fì<PT,0,1> 

3140 FORTT=1T02 
3150 Tfì=2 

3160 F0RT=2T0A<PT,0,0 > + J 

3170 INPUT#2,fì <PT,TT,Tfì >,fì CPT,TT,Tfì+1> 

3180 Tfì=Tfì+2 

3190 NEXTT 

3200 NEXTTT 

3210 NEXTPT 

322*0 CL0SE2 

3230 GOTO30 

3240 •* 

3250 PR I NT ' 7FEGI STRAZI ONE DfìT.I : " 

3260 INPUT"NOME FILE";FT 

3270 0PEN2,8,2,"0 : * *+F$+ * *,SEO,WRITE" 

3280 R$-CHR$<13) 

3290 PRINT#2,fì <0,8,0 >;RT;fì 0,0,0> 

3300 F0RPT=2T0fì C 0,0,0 +1 
3310 Tfì=0 

3320 F0RT=0T0fì<PT,0,0 > +1 

3330 PRINT#2,R<PT,0,Tfì >:RT;fì < PT,0,Tfì+1) 

3340 Tfì=Tfì+2 

3350 NEXTT 

3360 NEXTPT 

3370 FRRPT=fì (0, 0, 0 > +2T0fì -r 1,0,0 > +fì < 0,0,0 > 
+ 1 

3380 PR I NT#2, fì< PT, 0,0 >RT : R •:! PT, 0,1 > 

3390 F0RTT=1TG2 
3400 Tfì—2 

3410 FORT=2T0fì <PT,0,0 > +1 

3420 PR I NT#2, fì < PT, TT, Tfì >RT : A ( PT, TT, TA +1 

•> 

3430 Tfì-Tfì+2 
3440 NEXTT 
3450 NEXTTT 
3460 NEXTPT 
3470 CL0SE2 
3430 GOTO30 

3500 IFX1>3190RX1<0ORX2>3190RX2O3THENRET 
URN 

3510 IFV1>1990RV1<0ORV2>199ORV2<0THENRET 
URN 

3520 LINEX1,V1,X2,V2,1 : RETURN 
3530 PLOTXÙt', 1 :NEXTV, X : RETURN 
3700 XT="" 

3710 GETXT : IFXT= ' * ' ‘THEN3710 
3720 RETURN 

3740 PR I NT * *71' * •' NRM : PSET2 : END 
REfìDV. 
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ASTRONOMIA-DIDATTICO 

di M. Truscelli 


C16 

SATURN 


n uno dei precedenti 
numeri è stato pub¬ 
blicato un pro¬ 
gramma che simulava la 
discesa di una navicella 
spaziale sulla luna. Sem¬ 
pre per rimanere in tema 
e, per soddisfare le nu¬ 
merose richieste di tutti 
coloro che ci hanno scrit¬ 
to chiedendoci di pubbli¬ 
care programmi in tema 
con l’astronomia e con 
l’osservazione degli astri, 
presentiamo in questo 
numero un programma 
per l’osservazione, ed il 
termine non sembri ina¬ 
deguato perché di effetti¬ 
va osservazione si tratta, 
del pianeta Saturno. 
Sicuramente avremo in¬ 
generato non poca confu¬ 
sione ma, si tratta di un 
programma che permette 
di visualizzare sullo 
schermo collegato al 
computer, la posizione di 
Saturno ed in particolare 
dei suoi famosi anelli in 
relazione alla Terra in un 
determinato anno prece¬ 
dentemente introdotto. In¬ 
negabili sono i vantaggi 
di un tale programma 
nello studio dell’astrono¬ 
mia e della geografia 
astronomica. Usato op¬ 
portunamente, il pro¬ 
gramma permette di valu¬ 
tare approssimativamen¬ 
te il periodo di rivoluzio¬ 
ne attorno al Sole oltre 
che esprimere in modo 
immediato alcune parti¬ 
colarità del pianeta, quali 
l'asse polare decentrato 
ecc. 

Il programma è piuttosto 
semplice e mediante l’u¬ 
so di un appropriato algo¬ 
ritmo, partendo dall’anno 
in cui si vuol osservare il 
pianeta trasforma, tenen¬ 
do conto del periodo di 
rotazione e di rivoluzione 



Come calcolare rapidamente 
la distanza di un pianeta dalla Terra 


di Saturno e della Terra, 
la posizione del pianeta 
in dati traducibili in un di¬ 
segno visualizzato sullo 
schermo. 

A corredo di queste note 
introduttive presentiamo 
due fotografie dei risultati 
per gli anni 1955 e 1961, 


unitamente ad un breve 
quadro esplicativo che 
mette in evidenza le pe¬ 
culiarità dei due pianeti a 
cui abbiamo finora fatto 
riferimento: la Terra e 
Saturno. 

Nel riquadro riferito all'e¬ 
tà si è preso in considera- 



© 


FACILE 


Tempo 
di esecuzione 

2 ORE 


zione il caso di una per¬ 
sona nata sulla terra la 
cui età si aggiri intorno a 
24 anni; su Saturno, a 
causa dell'anno «satur- 
niano» di 10.761 giorni la 
stessa persona «ringiova¬ 
nirebbe» a nemmeno un 
solo anno. 


10 GRAPHIC1,1 : COLOR0,1,1 :C0L0R4,1,1 : COLORI,2,7 
20 CIRCLE1,160,100,50,50 
30 FORV=100TO131 :DRAW0,90,VT0210,V 
40 NEXTY 

50 CIRCLE1,160/100;20,50/,, 90 
60 DRRU1, 100> 100TO220, 100 
70 BRAMI,160,40TO160,100 
80 BRAMI,110,40TO160,100 
90 CHRR1,23;7;"0":CHRR1;24,8;"0" 

100 CHRR1,21,6,"0" 

110 DRAW1,160,100TO172,52 : DRRW1,160,100TO188,60 : DRRW1,160,100TO196,68 
120 CHRR1,5,20,"CALCOLO DELLE ORBITE DI SATURNO" 

130 GETXf:IFXf»""THEN130 
140 SCNCLR : QRflPHICCLR 
150 A»90•45 : B a 133 : R*54 

160 SCNCLR:INPUT"INTRODURRE L'ANNO DR ESAMINARE :";RR 
170 PRINT"*BD0ajN ATTIMO... CALCOLI IN CORSO" 

180 E1 =C0S < 2#ff* ( AA-1.9804E3 > 729. 4566+P0/2 ) #S IN < 28. 6*1T/180 ) 

190 D“RTN(E1/SQR<-E1*E1 + 1)> = DT*.02:F»ABS<TAN<D>> 

200 V1-F*<H12-RT2> f. 5 : V2*F#<BT2-RT2) T. 5 

210 IFD>*0THENK»1:GOTO230 

220 K=-l 

230 SD=SIN<D) 

235 GRAPHIC1,1 : FORW-1TO100 : X»INT<RND<1)*300)+l:Y=INT<RND<1>#180>+1:DRRW1,X,Y 
240 NEXTW: FORT a 0TOffSTEPDT 
230 TT-SIN<T):CT-COS<T) 

260 X1-fl*CT: V1»A*SD*TT 

270 X2=B#CT:Y2=B#SD#TT 

280 X3=R*CT:Y3=K#R#TT 

290 IFABSCYlXV1THENDRAW1,XI+160,100-Y1 

300 IFABS<Y2XV2THENDRAW1,X2+160,100-Y2 

310 DRAW1,X3+160,100-Y3 : NEXT 

320 FORTETO <2*ff)STEPDT 

330 TT*SINCT) : CT*C0S(T) 

340 Xl*fl#CT:Yl«fl*SD#TT 
350 X2»B*CT:Y2-B*SD*TT 
360 X3 e R#CT:Y3=K#R#TT 

370 DRAW1,XI+160,100-Y1 : DRAW1,X2+160,100-Y2 

380 IFABSCV3XV1ORABS<Y3)>V2THENDRAW 1, X3+160,100-Y3 

390 NEXT 

395 CHAR1,5,24,"PREMI UN TASTO PER CONTINUARE" 

400 GETAf : IFA$*""THEN400 
410 GRAPHICCLR:SCNCLR 

420 PRINT"VUOI VERIFICARE UN ALTRO CASO <S/N) ?" 

430 GETXf : IFX$=""THEN430 
440 IFXf="S"THEN140 
450 IFX$="N"THEN470 
460 GOTO430 
470 SCNCLR:END 
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CHIMICA 16 

Apprendere divertendosi 
la tavola periodica degli elementi 


©a 


Tempo 
di esecuzione 

3 ORE 


|;jjijjj a quantità di richieste 
iffljj jl riguardanti la pubbli- 
cazione di programmi 
didattici per il Commodore 
16 ci ha convinti a rispolve¬ 
rare alcuni dei programmi 
didattici già apparsi sulla ri¬ 
vista ed a curarne la versio¬ 


ne adatta a questo ormai dif¬ 
fuso computer. 

Iniziamo con un programma 
che trasforma il computer in 
un solerte e paziente «pro¬ 
fessore» di chimica, insieme 


STRUTTURA DEL PROGRAMMA 


ste e per eventuali correzioni, ripeti- 

10-110 

Note di presentazione del programma 


zione della domanda e prosegui- 

120-240 

Schermo iniziale del programma 


mento del ciclo principale 

250-340 

Scelta del tipo di «interrogazione» da 

600 

Aggiornamento valutazione 


sostenere (1 facile - 3 difficile) 

610-640 

Valutazione della preparazione 

350-390 

Lettura del blocco di dati e genera¬ 
zione casuale del numero di doman- 

650-690 

Richiesta per un nuovo test o per la 
fine del programma 


de 

700 

Fine programma 

400-440 

Visualizzazione delle istruzioni ri¬ 
guardanti il come rispondere alle do- 

710-980 

Blocco di istruzioni DATA compren¬ 
denti simbolo e relativo elemento 


mande 

990 

Routine per la stampa dell'intestazio- 

450-510 

Routine di visualizzazione del simbo- 


ne degli schermi 


lo e relativa domanda 

1000-1030 

Routine sonora in caso di risposta 

520-590 

Routines per il controllo delle rispo- 


sbagliata 


10 rem ******************************** 

20 REM * « 

30 REM * INTERROGAZIONE DI CHIMICA * 

40 REM * * 

30 REM * MAURO CIFANI <C> 1984 * 

60 REM * « 

70 REM * VERSIOhC PER COMMODORE 16 * 

80 REM * * 

90 REM * DI MASSIMO TRUSCELLI * 

100 REM * * 

110 REM ******************************** 

120 PRINT-LO’JCHR*<142)«COLORO,1,3«C0L0R4,1,3 

130 FORV1TO40:PRINT*_"> rNEXTV 

140 F0RV1T07«PRINT"| ■lSPC(38)r PIINEXTV 

130 FORV-1TO40IPRINT’—JINEXTV • 

160 PRiNrwiMBBinrwinn nn m^nun • 

170 PRiNT-uHaam^ iiljis hi vi a ■ m/w ■ /wm i * 

190 PR 1 NT “ w umi —uà ■ Il II TIMI - 

- 1 !■■■■! Il IHURMIHIII wm ■* 

210 FORVITO40:PRINT"a_"> :NEXTV 

220 FORVI T08:PRINT'| -|SPC<38)I* |'»i|sEXTV 

230 FORV 1TO40 :PR IMT"”* ; «NEXTV 

240 GETX*:IFXV-THEN240 

230 PRINT"L** ;CHR*C14) 

260 COLORO,1,3 t COLOR4,1,3 t PRINTCHR*<14)lDIMS*<104),E*<104) 

270 ——ri*^r/-S - KV-4- 

280 L*“ *-■ 

290 GOSUB9901 PR INT'nMBmMM 1 ■ “CEMENTI -OMUNI ■ 

300 pr i nt * nano 2 ■ “LEfCNTI INCONSUETI* 

310 PR1NT"MMMB 3 ■ “LEMENTI \OLTO — IFFICILI" 

320 PRiNT'mnm ■ «cegli* 

330 GETAStIFA*=""THEN330 


al quale potrete ripetere la 
tavola periodica degli ele¬ 
menti senza tema di essere 
giudicati severamente, ma 
con il vantaggio di essere 
voi stessi a dover dare, con 
l'aiuto del computer, il giu¬ 
sto giudizio sulla vostra pre¬ 
parazione, apprendendo 
mentre vi divertite. 

Il programma è strutturato in 
maniera semplice e lineare 
e permette, grazie a queste 
caratteristiche, l'adattamen¬ 
to a usi svariati ed a marche 
diverse di computers; solo 
per fare un esempio la prima 
cosa che ci viene in rivinte è 
sostituire i simboli e gli ele¬ 
menti con capoluoghi di pro¬ 
vincia e regioni, ma ci si può 
sbizzarrire in tutti i modi che 
la fantasia suggerisce. 
Grazie alla struttura modula¬ 
re del programma è possibi¬ 
le adattare il grado di diffi¬ 
coltà delle domande alla 
preparazione di chi ne frui¬ 
sce e nel caso si cada in er¬ 
rore, il computer indica la ri¬ 
sposta giusta, riproponendo 
immediatamente la doman¬ 
da, e svolgendo nel contem- 


58 


LIST 10/11 


























CHIMICA—DIDA TTICO 

di M. Truscelli 



po, una funzione quasi «pro¬ 
pedeutica» nell'apprendi¬ 
mento e nello studio della 
materia. 

IL PROGRAMMA 

Dopo il primo schermo di 
presentazione, schiacciando 
un tasto è possibile selezio¬ 
nare il grado di difficoltà del¬ 
le domande che il computer 
visualizzerà. 

In base all'opzione scelta le 
subroutines contenute dalla 
linea 360 alla linea 380 prov¬ 
vedono a leggere le informa¬ 
zioni contenute nel blocco di 
istruzioni DATA presenti dal¬ 
la linea 710 alla linea 980; in 
base a ciò (difficoltà da 1 a 
3), vengono rispettivamente 
memorizzati 45, 62 o tutti e 
103 gli elementi della tavola 
contenuti nel programma. 
Una volta immagazzinati i 
dati nei vettori S$ e E$, di¬ 
mensionati nella linea 260, 
il programma provvede a 
scegliere casualmente il nu¬ 
mero delle domande da por¬ 
re (variabile N%) e sempre 
tramite la funzione RND (va¬ 
riabile A), a «pescare» nei 
due vettori il simbolo e Me¬ 
mento corrispondente, og¬ 
getto della domanda. 

A proposito di domande, in 
questa versione del pro¬ 
gramma è presente una par¬ 
ticolarità che permette di 
usare l'istruzione INPUT 
senza che sia visualizzato il 
punto interrogativo. 

La routine che consente tale 
possibilità è contenuta tra le 
linee 480 e 500. 

Il trucco consiste nell'aprire 
un FILE dal dispositivo 0 cor¬ 
rispondente alla tastiera; ciò 
avviene grazie all’istruzione 
OPEN 1,0 ed al successivo 
INPUT #1,R$. 

In tal modo la normale istru¬ 
zione INPUT contenuta nel 
sistema operativo, viene so¬ 
stituita da una istruzione IN¬ 
PUT da dispositivo, nel no¬ 
stro caso la tastiera. 

Alla fine del ciclo di doman¬ 
de rivolte dal computer è 
possibile sapere la valuta¬ 
zione in percentuale della 
propria conoscenza dell’ar¬ 
gomento trattato. 


340 IFVAL(A*)<ÌORVALCA»)>30RVAL(A4)=0 THEN330 
330 ONVAL(A*)GOTO360,370,380 

3G0 F0RI=1T043«READS*<I),E*<I):NEXT: MD=45:GOTO390 
370 FORI=lT062:READS*<I),E*<I):NEXT«NC=62iGOTO390 
380 FORI«ITO 103:REAOS*(I),E*<I): NEXT « ND«103 
390 GOSUB990*NX=INT(RND<1)»ND)+1 
400 PR I NT 'MmnKH'NX.*DOMniOE ' 

4 10 PRINT'nHHHnnM-ISPONDERE SCRIVENDO IN MINUSCOLO" 

420 PRINT'E BATTE NCO C_~| AL TERMINE ■ 

430 PRINT'MBBnER PROSEGUIRE PRENERE UN TASTO" 

440 GETA*> IFA*=“ "THEN440 

430 S«0*FORN«1TONX:T«0:A =INT(fD«RND<1>♦1)»OS=S*<A)«RR*«E*<A> 

460 GOSUB990 : PR INT "9BBBBMWJALE ELEMENTO HA IL SINBOLO INDICATO?" 

470 PRINT" »——————a -D«" — ■ 

480 PRINT’nMHMaMT * • OPEN1 ,0 
490 INPUT* 1,RS 

500 CLOSE 1 : IFR*< >RR*THENPR INT: GOTO330 
510 PRINT 

520 S-S+(2-T)iPRINT"«nNI I !"!■" « GOTO570 
530 T«T+1 !IFT<>1THENPRINT!GQTO550 

540 PRINT'MT"_*1 T. . . " t GOSUB 1000 t GOTO460 

550 PRINT"*-_*| r .ERA!■" JRR*sFORO=1TO20001NEXTO 

560 T=2sPRINT"*Ì_-,-l_rX-,*Nr. . . " s FORO= 1TO500 • NEXTO : GOSUB 1000 s GOTO460 
370 PRINT" »—T ER PROSEGUIRE PREMERE UN TASTO" 

580 GETA*:IFA*=""THEN580 

590 OS="":RR*=""s NEXTN 

600 S1«S/(2*ND'):P=INTCS1*100*.5) 

610 GOSUB99Q SPRINT" »— "REPAR AZ IONE AL"JP;"%" 

620 1FP < 40THENPRINT")—-.NSUFFICIENTE !!" 

630 IFP > = 40ANDP < 80THENPRINT "J— UTRESTI MIGLIORARE!" 

640 IFP>«80THENPRINT")—-ONPLINENTI !!" 

650 PRINT"9B—a—H—*LTRA INTERROGAZ IONE <S/N)7" 

660 GETA»!IFA*=""THEN660 
670 IFAS="S"THENRUN 
680 IFA*="N"THEN700 
690 GOTO660 

700 PRINT"J":PRINTCHR*<142)1END 

710 DATA"4L",ALLUMINIO,"4G *,ARGENTO,*4",ARGON,"4S".ARSENICO,"/",AZOTO 
720 DATA"|A",BAR IO 

730 DATA"|E",BERILLIO,"II",BISMUTO,"|",BORO,"IR“,BROMO,"—O",CADMIO,"—A",CALCIO 
740 DATA"-",CARBONIO,"—S",CES IO,"—L",CLORO,"—O",COBALTO,R",CROMO," |E",ELIO 
730 DATA "-E " ,FERRO , "_" , FLUORO , "T , FOSFORO , " I" , IDROGENO IODIO, "LI " ,L IT IO 

760 DATA "\G",MAGNES IO, "\N" .MANGANESE," |G",MERCURIO,"/E ",NEON,"/I ",NICHEL 
770 DATA"T",OSSIGENO 

780 DATA "4U " , ORO, "“B" ,PIOMBO, "“TT" .PLATINO, m ■» " .POTASSIO , "_A " ,RAD IO , U " .RANE 
790 DATA"VE".SELENIO 

800 DATA "VI " .SILICIO,"/*".SODIO,"*" .ZOLFO, "W .STAGNO, "*R" .STRONZIO 
810 DATA" | I",TITANIO 

820 DATA" .URANIO,"4N",ZINCO,"-E".CERIO,"-M".FERMIO,"I A".GALLIO,"I E".GERMANIO 
830 OATA--.R" , IRIDIO, "-'R" .KRIPTO, "LA" .LANTANIO , "ND" .MOLIBDENO , "/D " ,NEOO 1MIO 
840 DATATE" .OSMIO 

830 DATA"-p" .PALLADIO, "TJ" .PLUTONIO, "| L " ,TALL IO , " O" .TUNGSTENO , "X" .VANADIO 
860 DATA"4E",XENON 

870 DATA * 4R",ZIRCONIO," |F",AFNIO,"4M".ANERICIO,"*B".ANTIMONIO,"4T".ASTATO 
880 DATA-4C".ATTINIO 

890 DATA"IK".BERKELIO,"—F",CALIFORNIO,"—M",CURIO,"—Y",DISPROSIO,—S",EINSTENIO 
900 DATA"-R" .ERBIO, "~U" .EUROPIO, "-R" .FRANC IO," |D" .GADOLINIO, "-.N" , INDIO 
910 DATA" B-.ITTERBIO 

920 DATA" |",ITTRIO,"LU", LUTEZIO, "\D".NENOELEVIO,"/P", NETTUNIO, */B", NIOBIO 
930 DATA"/D".NOBEL IO 

940 DATA" IO",OLMIO,"“D".POLONIO,*“P".PRASEODIMIO,*T4*.PROMETEO 
930 DATA" - B".PROTOATTINIO 

960 DATA "_N" .RADON, "_E" .RENIO, "_H" .RODIO, *_B" , RUB ID IO , "_JU " .RUTENIO , "4M* .SAMAR IO 

970 DATA"*C" .SCANDI0,"| A " , TANTAL IO , " I E " .TELLUR IO , * | C" .TECNETO , "I B", TERBIO 

980 DATA" I H".TORIO,"| M".TULIO,"LW".LAWRENZ IO 

990 PRINT'U" tPRINTT*:PRINTL*:RETURN 

1000 V0L8 

1010 FORS=1000TO700STEP-25 
1020 SOUND 1,S,1 
1030 NEXTS:RETURN 
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MEDIA Tempo 


DIFFICOLTA di esecuzione 

2 OHE 


su schermo o plotter una... PIANTA DI FABBRICATI 


|ij||ÌÌÌÌ; I nuovo standard MSX 
ili prevede un discreto 
iiiiiliiii; numero di istruzioni 
grafiche che possono essere 
usate in SCREEN 2 o 3 e che 
possono soddisfare le esi¬ 
genze di chi voglia usare il 
computer per eseguire dise¬ 
gni su schermo o plotter. 
Attenzione però! Non dimen¬ 
ticate che il vostro MSX ap¬ 
partiene alla fascia degli Ho- 
me-Computers e quindi pos¬ 
siede una risoluzione grafi¬ 
ca massima pari a 256 x 192 
punti. 

Se avete la possibilità di 
procurarvi il listato di un 
programma scritto in BASIC 
di un PC IBM o OLIVETTI M 
24, potrete notare la somi¬ 
glianza tra questo tipo di lin¬ 
guaggio BASIC e quello pro¬ 
prio dello standard in que¬ 
stione. Ciò dimostra che il 
vostro computer, per piccolo 
che sia, può essere impiega¬ 
to anche in campi speciali¬ 
stici e quindi non a fini pret¬ 
tamente hobbistici. 

Il programma che vi propo¬ 
niamo nelle pagine seguenti 


è un applicativo che permet¬ 
te di disegnare, su schermo 
e/o plotter, la pianta di fab¬ 
bricati offrendo la possibilità 
di memorizzare quanto rea¬ 
lizzato su nastro magnetico. 
Non è comunque obbligato- 
rio che il disegno sia di tipo 
esclusivamente architettoni¬ 
co: per ovviare a ciò basta 
infatti modificare alcune del¬ 
le possibilità offerte dal pro¬ 
gramma. 

La possibilità di memorizza¬ 
re i disegni eseguiti risulterà 
senz’altro molto utile sia a 
quanti vogliano interrompe¬ 
re il lavoro per poi ripren¬ 
derlo in un secondo tempo, 
sia a quanti vogliano invece 
avere a disposizione un ar¬ 
chivio di tutte le piante ela¬ 
borate. 

Lo schema di base del pro¬ 
gramma si fonda su due fasi 
fondamentali: la prima di co¬ 
struzione del disegno (o EDI¬ 
TING), la seconda di memo¬ 
rizzazione del lavoro svolto. 
La fase di costruzione del di¬ 
segno risulta effettivamente 
un po’ laboriosa anche se è 


possibile sfruttare le nume¬ 
rose possibilità previste nel 
programma, in grado di dare 
un valido aiuto all’operatore. 
Il programma prevede ben 

10 opzioni attraverso le quali 
è possibile eseguire alcune 
figure architettoniche e geo¬ 
metriche prefissate, le cui 
dimensioni, in centimetri, 
debbono essere inserite dal¬ 
l'operatore: queste verranno 
poi disegnate su video a par¬ 
tire da un punto rosso indi¬ 
cato da una freccia (sprite). 
Le coordinate di tale punto, 
rispetto ad un sistema di ri¬ 
ferimento che ha come origi¬ 
ne il punto (0,0) dello scher¬ 
mo, vengono visualizzate 
nella parte in basso a destra 
dello schermo stesso. 

La freccia può essere spo¬ 
stata con i tasti cursore nelle 
otto direzioni e la sua posi¬ 
zione viene visualizzata ad 
ogni rilascio dei tasti stessi 
onde evitare un movimento 
troppo lento. 

Le routines grafiche sono ri¬ 
chiamabili grazie ai tasti 
funzione, i quali vengono 
sempre disabilitati durante 
l'immissione dei dati onde 
evitare una «uscita» indesi¬ 
derata dalla routine in fase 
di esecuzione. 

11 programma è stato struttu¬ 
rato in modo tale che basta 
far leggere una sola volta la 
linea nella quale sono indi¬ 
cate le routines cui ricorrere 
nel caso venga premuto uno 
dei tasti funzione; in tal mo¬ 
do anche se i tasti funzione 
vengono disabilitati median¬ 
te l’istruzione «KEY (n) 
OFF», a programma lancia¬ 
to, il computer «ricorderà» 
cosa fare. 

Sempre a proposito dei tasti 
funzione, si è pensato di as¬ 
segnare ad ognuno di essi, 
quando disabilitati, la fun¬ 
zione di stringa vuota - ovve¬ 
ro (“ “). Ciò è stato imple¬ 
mentato in modo da evitare 
che quando il programma ri¬ 
chiede l’INPUT di opzioni 
tramite i tasti alfanumerici, 
se si preme per errore un ta¬ 
sto funzione vengano im¬ 
messi valori errati o più 


semplicemente indesiderati. 
Se ad esempio si volesse 
entrare in modo TRACE e 
per errore venisse premuto 
il tasto funzione 2, dove è 
memorizzata l’istruzione 
«CONT», invece del tasto T, 
il computer considererebbe 
come valore alfanumerico la 
«c» di CONT saltando alla 
routine di cancellazione del¬ 
l’ultima opzione che certa¬ 
mente non si voleva richia¬ 
mare. 

Le dieci opzioni «architetto¬ 
niche», richiamabili median¬ 
te i tasti funzione insieme ad 
altre sei, richiamabili dai 
normali tasti alfanumerici, 
sono visualizzabili premen¬ 
do l’opzione 1 del Menù 
principale. Tuttavia ognuna 
di esse deve essere provata 
più volte prima di essere uti¬ 
lizzata in fase di EDITING.* 
La funzione più «pericolosa» 
da usare è quella relativa al¬ 
la colorazione del disegno o 
di parte di esso e va richia¬ 
mata solo alla fine del lavoro 
e solo quando si è certi che 
la parte da riempire sia stata 

ELENCO 

OPZIONI-ELEMENTI 
ARCHITETTONICI 

— Spezzata 

— Linea 

— Finestra orizzontale 

— Finestra verticale 

— Porta in su 

— Porta in giù 

— Letto 

— Armadio 

— Cerchio o arco di cerchio 

— Riempimento 

ELENCO 
MODI GRAFICI 

S = INOUT testo 
T = TRACE ON/OFF 
R = reticolo ON/OFF 
C = CLEAR - cancellazione 
ultima opzione 
D = DELETE - cancellazione 
totale 

E = END - fine lavoro. 


STRUTTURA DEL PROGRAMMA 

10-330 

inizializzazione e Menù principale 

340-460 

immissione dati reticolo, della max. di¬ 
mensione e calcolo valore di scala (SC) 

470-570 

disegno reticolo 

580-620 

cancellazione scritte sul fondo dello 
schermo 

630-1580 

visualizzazione opzioni 

1590-1640 

routine funzionale 

1650-1750 

richiesta tasto 

1760-1800 

abilitazione tasti funzione 

1810-1850 

disabilitazione tasti funzione 

1860-1900 

cancellazione tasti funzione 

1910-2170 

INPUT opzioni e movimento freccia 

2180-3810 

routines grafiche (10) 

3820-3910 

routine funzionale 

3920-4150 

INPUT dati e memorizzazione 

4160-4290 

disegno da file in INPUT 

4300-4730 

routine registrazione ed immissione dati 
file 

4740-4830 

cancellazione ultima opzione grafica 

4840-4930 

definizione sprite 

4970-5000 

routine funzionale 

5010-5290 

TRACE ON/OFF 

5300-5490 

testo su SCREEN 2 

5500-5570 

routine funzionale. 
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DISEGNO-APPLICATO 

di F. Russo 



VARIABILI E MATRICI 

S 

_ 

indice ultimo codice routine grafica contenu- 






to nel vettore A% (999) 

A%(999) 

= 

vettore codici e coordinate relative opzioni 

se 

= 

fattore di scala 



grafiche 

1 

= 

flag per salto alla routine che visualizza le 

S%(999) 

= 

vettore indici puntatori ai codici grafici in A% 



coordinate dello sprite dopo ogni sposta- 



(999) 



mento dello stesso 

A% 

= 

stringa per INPUT dati numerici in SCREEN 2 

FL 

= 

flag disegno da caricamento dati 



e nome file di INPUT o OUTPUT 

U1 

= 

flag TRACE ON/OFF 

Al 

= 

flag per ritorno da routine grafica eseguita 

U2 

= 

flag testo ON/OFF 



con dati caricati da nastro, tastiera o elimina- 

X,Y 

= 

coordinate relative al punto fissato con TRA- 



ti da routine di cancellamento 



CE ON e visualizzate in cm. 

A2 

= 

distanza tra i punti del reticolo 

XI,Y1 

= 

coordinate del punto fissato con TRACE ON 

A3.B3 

= 

coordinate sprite 

W 

= 

indice ultimo dato immesso nel vettore A% 

C 

= 

ascissa per scritte in SCREEN 2 



(999) 

C2 

= 

flag per opzione “R" (disegno reticolo) 

z 

= 

indice matrice S% (999) - si incrementa o de- 

CO 

= 

colore figure grafiche - se uguale ad 1 le can- 



crementa ad ogni immissione o cancellazio- 



cella 



ne di opzione grafica 


io ... 

20 '' PIANTA DI FABBRICATI ' ' 

30 * * 

40 " DI F. Russo " 

50 i' 

60 ' " list 19B5 " 

70 ’ msx " " " *. msx ’ 

80 * 

90 C0L0R15,1,1 
100 MAXFILES=2 
110 0PEN"GRP:"AS1 
120 DIMAX(999),SX(999) 

130 SCREEN1,,0iKEY0FF 
140 S0SUB4870:B0SUB1890 
150 HIDTH20 
160 LOCATEO,4 

170 PRINT'PIANTA DI FABBRICATI" 

180 LOCATEO,5 

190 PRINT"." 

200 LOCATEO,lOiPRINT"1> Opzioni* 

210 LOCATEO,12iPRINT*2) Disegno pianta* 
220 LOCATEO,14iPRINT*3) Caricamento dati 
230 LOCATEO,16tPRINT*4) Uscita prograeaa 

240 II-INKEYIiIFI*»""THEN240 

250 IFA8C(I*)>520RASC(I$X49THEN240 

260 0NVAL(I*)G0T0290,350,270,280 

270 T-ltMIDTH32S60T04410 

280 SCREENOiC0L0R15,4,4iKEYONiHIDTH32IEN 

D 

290 G0SUB660 

300 G0SUB350 

310 CO-lSiC2-2iG0SUB500 

320 A3-12SIB3-100 

330 GOT01940 

340 * 

350 SCREENliKEYOFFiWIDTH22 
360 LOCATEO,12 

370 INPUT" Iaaatti la larghezza oaltezza 
aassiaa aisu-rata (ca)*|SC 
380 IFSC»0THENSC»1:G0T0410 
390 IFSC>50000RSC<150THENCLS:60T0360 
400 SC-SC/150 

410 CLS:MIDTH27iL0CATE0,12 

420 INPUT* Iaaetti la distanza tra i pu 

nti del reticolo*jA2 

430 IFA2»0THENSCREEN2iG0SUB56OiG0T032O 

440 IFA2/SC<SCTHEN410 

450 A2*A2/SC 

460 6QT0310 

470 .. 

480 reticolo 


490 . 

500 SCREEN2 

510 F0RT-DT0255STEPA2 

520 FORTI*ET0181STEPA2 

530 PSET(T,TI),CO 

540 NEXTTI, T 

550 IFC202THENRETURN 

560 LINE(0,183)-(255,191),15,BF 

570 RETURN 

580 . 

590 *" cane, scritte 

600 . 

610 LINE(0,183)-(255,191),15,BF 
620 RETURN 

630 . 

640 *" opzioni 

650 . 

660 SCREEN2 

670 LINE(90,0) — (160,25),8,B 
o80 LINE(93,3)-(157,22),8,8F 
690 PSET(100,10),8 
700 PRINTil,"OPZIONI" 

710 A-OiB-40iC-1i60SUB1600 
720 PSET(5,50),1 

730 PRINTil,"SPEZZATA <xl,y1-x2,y2-ecc.) 

740 LINE(3,45)—(68,60),,B 

750 PSET ( 125,70),1 

760 DRAH’c15115d30f5r20ul5r10" 

770 B*120iC*2iGOSUB1600 
780 PSET(5,140),1 

790 PRINT*1 t "LINEA (x1,yl-x2,y2)* 

800 LINE(3,13S)-(43 t ISO),,B 
810 LI NE(110,160>-(150,170) 

820 PSET(94,157),liPRINT#l,"Pl" 

830 60SUB1680 

840 B-10iC-3iG0SUB1600 

850 PSET (5,20),1 

860 PRINTI1,"FINESTRA ORIZ. (xl,yl-l,h)" 
870 LINE(3,15)-(114,30),,B 
880 LINE(115,40)—(135,45),,B 
890 LINE(11S,41)—(135,42),,BF 
900 PSET (101,35) v 11PRI NT * 1,"P1" 

910 B«70iC«4:G0SUB1600 
920 PSET(5,85),1 

930 PRINTil,"FINESTRA VERT. (xl,yl-l,h)" 

940 LINE(3,80)—(114,95),,B 

950 LINE( 123,100)-(125,120),,BF 

960 LINE(123,100)-(128,120),,B 

970 PSET(109,97),liPRINTil,"Pl" 

980 B*135iC«5:60SUB1600 
990 PSET(5,145),1 


1000 PRINTil,"PORTA IN SU’ (xl.yl-l)" 
1010 LINE(3,140) — <100,155),,B 
1020 PSET(113,157),1 
1030 DRAM"cl5r20d20h20" 

1040 PSET(101 t 157),liPRINTil,"PI" 

1050 60SUB1680 

1060 B*10iC E 6:60SUB1600 

1070 PSET(5,20),1 

1080 PRINTil,"PORTA IN GIU’ <x 1,y1-1)- 
1090 LINE(3,15) — (107,30),, B 
1100 PSET(132,35), 1 
1110 DRAWC15D20L20E20" 

1120 PSET(100,55),1 1 PRINTil, “PI ■ 

1130 B-75iC>7i60SUB1600 
1140 PSET(5,85),1 

1150 PRINTil,"LETTO <xl,yl-l,h) 

1160 LINE(3,80> — (43,95), ,B 
1170 LINE(105,100> — <145,115), , B 
1180 LINE (105,100>-(145,115) 

1190 PSET(91,96),liPRINTil,"Pl" 

1200 B*135:C b 8s60SUB1600 
1210 PSET(5,145),1 

1220 PRINTil,"ARMADIO (xl,yl-l,h)" 

1230 LINE(3,140)—(60,155),,B 
1240 LINE(10S,160)—(145,175),,B 
1250 LINE<105,160) — <145,175) 

1260 LINE(105,175)—(145, 

1270 PSET(91,157),1 1 PRINTil,"PI“ 

1280 G0SUB1680 

1290 B-10iC-9iGOSUB1600 

1300 PSET(5,20),1 

1310 PRINTil,"CERCHIO 0 ARCO DI CIRC." 
1320 LINE(3,15)-(185,30),,B 
1330 PSET(5,40),1 

1340 PRINTil,"(xl,yl-raggio-ang.l,ang.2) 

1350 CIRCLE(100,65),10 

1360 CIRCLE(140,75),20,,,2.5 

1370 B=90:C*0iG0SUB1600 

1380 PSET(162,82),liPRINTil,"l* 

1390 PSET(5,100),1 

1400 PRINTil,"RIEMPIMENTO <xl,yl)" 

1410 LINE(3,95)-(91,1 IO) , ,B 
1420 LINE <0,170) — (255,191),15,B 
1430 PSET(120,120) 

1440 DRAN"ct5(30gl0h30el0" 

1450 CIRCLE(130,140),28 
1460 PAINT <115,145) 

1470 G0SUB1680 
1480 CLS 

1490 PSET (88,20), 1 1 PRI NT#1,"T ASTI" 
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1500 LINE(88,30)-(156,30),15 


xi-a: 

1:Yl a B3t 60SUB5160IELSEUl-Oi80SUB5260 

1510 PSET(50,50),1 :PRINTil,*'S'. 

....inpu 

2160 

IFII a *t*0RII a *S*THENG0SUB5330:G0T01 

t tetto* 


940 


1520 PSET(45,70),1tPRINTil,*’T'. 


2170 

60T02000 

1 on-o((* 


2180 


1530 PSET(40,90),liPRINTIl,’ ’R'. 

....reti 

2190 


colo on-oFf* 


2200 


1540 PSET(35,110),liPRINTtl,*'C' 

.can 

2210 

B4«‘Spezzata* 




60SUB1840 

1550 PSET(30,130),liPRINTIl,*'D' 

.can 

2230 

M a H*l:AX(M)>10001iREM CODICE SPEZZA 

c. totale * 


TA 


1560 PSET(25,150),liPRINTil,*'E‘ 

.fin 

2240 

S-NiU-0 


e lavoro* 

1370 60SUB16B0 

15B0 SCREEN1: RETURNI50 

1590 . 

1600 PSET(0,B*80),1 

1610 DRAM*cl3uB0R75UlORI00010R95dB0* 

1620 PSET(B0,B-8),1 

1630 PRINTI1,‘Tasto fun.*|C 

1640 RETURN 

1650 . 

1660 "* rie. tatto 

1670 . 

16B0 PSET(0,191),1 

1690 DRAH*cl5r70ul0r120d10r80* 

1700 PSET(73,103) t 1 

1710 PRINTIl,"Preti un tatto* 

1720 It-INKEY* 

1730 IFI«-**THEN1720 

1740 BEEP 

1750 CLSiRETURN 

1760 . 

1770 "* abil. tatti (un. 

1780 . 

1790 F0RT a lT010iKEY(T)ONiNEXT 
1800 RETURN 

1810 . 

1820 •*' dita, tatti (un. 

1830 . 

1840 F0RT-lT010iKEYmQFFiNEXT 
1850 RETURN 

1060 .. 

1870 cane, tatti (un. 

1880 . 

1890 F0RT a lT010lKEYT,**iNEXT 
1900 RETURN 

1910 . 

1920 Rie. opzioni 

1930 . 

1940 PSET(70,184),13]COLORIiCO"13 
1930 PRINTil l‘Inetti l‘opzione* 

1960 BEEPiC0L0R13 
1970 60SUB1790 

1980 ONKEY80SUB2210.2440,2590,2730,2910, 

3060,3210,3360,3320,3720 

1990 1-1iPUTSPRITEO,(A3,B3>,8 

2000 ONSTICK(0)60T02020,2030,2040,2030,2 

060,2070,2080,2090 

2010 I«-INKEY*iIFI*«**THENIFI«0THEN2000E 

LSEi60SUB5040iI a 0i60T02000i ELSE2100 

2020 B3 a B3-l 1 80T01990 

2030 A3»A3*1 1 B3-83-1 1 BOTO1990 

2040 A3 a A3*l 1 60T01990 

2050 A3 a A3*liB3 a B3*liBGT01990 

2060 B3 a B3*l 1 80T01990 

2070 A3-A3-1 1 B3 a B3*l 1 GOTO1990 

2080 A3-A3-1 1 80T01990 

2090 A3-A3-1 1 B3-B3-1 1 80T01990 

2100 IFU1-1THEN2130 

2110 IFI* a *d*ORI* a *D*THENCLSiCLEARiDIHAZ 
(999),SX(999 )1 COLOR 13,11OPEN'SRPi*AS1160 
T0300 

2120 IFI$ a "e'0RII a "E*THENCL8iN a M*l 1 AX(N) 
■11111 1 60T04330 

2130 IFII a *c*0RI* a *C*THEN60SUB4770 
2140 IF(I« a 'r*ORI* a 'R*)ANOA2>OTHENBEEPi I 
FC2-0THENC0 a 13iC2 a l 1 60SUB310i80T02000ELS 
EC2-0:CO-1:60SUB510:60T02000 
2150 IFI$ a *t*0RI4 a *T*THENIFUl a 0THENUl a l 1 


2250 60SUB4970 
2260 60SUB3830 

2270 LINE(0,183)-(70,191),1,B:BEEP 

2280 C-140 

2290 F0RT-1T02 

2300 60SUB3960 

2310 NEXTT 

2320 IFT-4THEN2360 

2330 LINE(140,183)-(220,191),15,BF 

2340 U=U*1 

2330 G0T022B0 

2360 LINE(AZ(S*1),AX(S*2))-STEP(AZ(S*3), 
AXIS+4)),C0 

2370 F0RT-S+3T0M-3STEP2 

2380 LINESTEP(0,0)-8TEP(AX(T*2),AX(T*3)) 

,C0 

2390 NEXTT 
2400 60T05330 
2410 

2420 •** linea 
2430 '«■*■*■» 

2440 B*-'Linea *|60SUB1840 

2450 M-M*1:AZ(M)*10002:REM CODICE LINEA 

2460 S a Nt U a 0 

2470 S0SUB4970 

2480 60SUB3850 

2490 LINE(0,183)-(50,191>,l,BiBEEP 

2500 C a 140 

2510 F0RT-1T02 

2520 60SUB3960 

2530 NEXTT 

2540 LINEIAX(S*1),AZ(S*2))-STEP(AZ(S*3), 
AX(S*4)),C0 
2550 60T05S30 
2560 

2570 (ineetra orizz. 

2580 ’... 

2590 B« a *Fin. oriz.*iG0SUB1840 

2600 N«N*l 1 AX(N) a 10003iREN CODICE FINEST 

RA. ORIZ. 

2610 S-HiU-0 
2620 60SUB4970 
2630 60SUB38S0 

2640 LINE(0,183)-(85,191),l,BiBEEP 

2650 C-150 

2660 F0RT-1T02 

2670 60SUB3960 

2680 NEXTT 

2690 LINE(AX(S*1),AX(S*2))-STEP(AX(S*3), 
AZ(S*4)),CO,B 

2700 LINE(AZ(S*1),AZ(S*2))-(AZ(8*l)*AX(S 

*3) ,AX(S*2)*AX(S*4)/3),CO,BF 

2710 B0T03530 

2720 •mmnmmmmmummmmmmmm 

2730 '** (inettra verti. 

2740 

2750 B* a *Fin. vert.*t60SUB1840 

2760 N a M*l 1 AX(N)"10004 1 REN CODICE FINEST 

RA. VERT. 

2770 S-MiU-0 
2780 60SUB4970 
2790 60SUB3850 

2800 LINE(0,183)-(85,191),l,BiBEEP 

2810 C-150 

2820 F0RT-1T02 

2830 60SUB3960 

2840 NEXTT 

2850 LINE(AX(S*1),AX(S*2>)-STEP(AX(S*3), 


AZ(8*4)),C 0,8 

2860 LINE(AX(S*1),AZ(S*2))-(AX(S*1)*AZ(S 
♦3)/3,AX(S*2)*AX(S+4)),CO,BF 
2870 G0T05330 

2880 .■— 

2890 ''' porta in tu' 

2900 —..— 

2910 B« a *Porta in tu'*i808UB1840 
2920 N a N*l 1 AX(N) a 10005>REN CODICE PORTA 
IN SU'* 

2930 S-NiU-0 
2940 60SUB4970 
2950 60SUB3850 

2960 LINE(0,183)-(95,191),1,BiBEEP 
2970 C-170 
2980 G0SUB3960 

2990 LINE(AX(6*1),AX(S*2)>-STEP(AZ(S*3), 
0),C0 

3000 L1NESTEP(0,0)-STEP(0,AZI 8*3)),CO 
3010 LINESTEP(0,0)-STEP (-AX(S*3),-AX(S*3 
) ) , CO 

3020 60T05530 
3030 

3040 '’’ porta in giu' 

3050 —————— 

3060 Bt-'Porta in giu ‘ ' 1 60SUB1840 
3070 N-N+l 1 AI(N)-10006iREM CODICE PORTA 
IN GIU'* 

3080 S-NiU-0 
3090 G06UB4970 
3100 60SUB3850 

3110 LINE(0,183)-(105,191),1,B>BEEP 
3120 C-180 
3130 B0SUB3960 

3140 LINE(AX(S*1),AX(S+2))-8TEP(AX<S*3), 
0) ,C0 

3150 LINESTEP(0,0)-STEP(0,-AX(S*3)),CO 
3160 LINESTEP(0,0)-STEP(-AX(S+3),AX(S+3) 
),C0 

3170 60T05530 
3100 

3190 **• letto 
3200 '■■■■■■■ 

3210 B4 a *Letto*i60SUB1840 

3220 N a N*l 1 AX(N)■10007iREN CODICE LETTO* 

3230 S-NiU-0 

3240 80SUB4970 

3250 60SUB38S0ILINE(0,183)-(45,191>,1,Bz 
BEEP 

3260 C-110 
3270 F0RT-1T02 
3280 80SUB3960 
3290 NEXTT 

3300 LINE(AX(8*1),AX(S*2))-STEP(AX(S*3), 
AX(8*4)) ,C0,B 

3310 LINE(AX(8*1),AX(8*2))-STEP(AX(8*3), 
AX(8*4)) ,C0 
3320 B0T05530 
3330 

3340 "* areadio 
3350 —— 

3360 B«>*Areadlo"i80BUB1840 
3370 N>N*liAX(N)>10008iREH CODICE ARMADI 
0 

3380 8-NiU-O 
3390 808UB4970 

3400 808UB38S0iLINE(0,183)-(60,191),1,Bi 
BEEP 

3410 C-130 
3420 F0RT-IT02 
3430 808UB3960 
3440 NEXTT 

3450 LINE(AX(8*1),AX(8*2>)-STEP(AX(8*3), 
AX(8*4)),CO,B 

3460 LINE(AX(8*1),AX(8*2))-STEP(AX(8*3), 
AX < 8*4)),C0 

3470 LINE(AX(8*1)*AX(8*3),AX(8*2))-8TEP( 
—AX(S*3),AX(8*4)),CO 
3480 80T05530 

3490 — 
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3500 cerchio o «reo 

3310 ....— 

3320 Bl-'Cer.o Are.*iB0SUB1840 
3330 U-M^liAX<W)-10009iREM CODICE ARCO 0 
ARCO 

3340 S a N 
3330 B0SUB497O 
3340 S0SUB3830 

3370 LINE(0,183)-(00,191 ) ,1,BiBEEP 
3380 PSET(133 ( 184),13iPRINT01,"raggio*iC 
■203i80SUB3960 

3390 LINE(133,184)-(231,191),15,BF 
3600 PBET(l53,184),13iPRINT#l,*ang.l*iC a 
200i80SUB3960 

3610 IFAX(S*4)>6THENN a N-li60T03600 
3620 LINE(135,184)-(251,191),15,BF 
3630 PSET(133,184), 13iPRINTI1,*ang.2*iC a 
200i60SUB3960 

3640 IFAX(S«3)>6THENH-N-li60T03630 
3630 IFAX(B*5) a OTHENA«6.20ELSEA a INT(AX(S 
♦ 5 )) 

3640 C1RCLE(AX(S+1),AX(S*2)),AX(S♦3),CO, 

AX<8+4),A 

3670 B0T05330 

3680 RETURN1940 

3690 

3700 rieapiaento 
3710 '—■■■■—— 

3720 Bf•*Rieapiaento* i808UB1840 

3730 H-M-aliAX(H)-IOOIO iREM CODICE RIEMPI 

NENTO 

3740 S-H 

3730 608UB4970 

3760 608UB3B30ILINE(0,103)-(90,191 ),l,Bi 
BEEP 

3770 C a 160iPSET(C,184),13 
3700 PRINTI1,STRI(A3)|STRI(B3^8) 

3790 IFP0INT(AX(SM),AX(S*2)> a 15THENC0 a l 
EL8EC0-13 

3800 PAINT(AX(8^1),AX(6+2)),CO 
3810 6QT03330 

3820 . 

3830 ''' Scritta valori 

3040 . 

3830 60BUB1840 
3860 808UB610 

3870 PSET(2,184),13iC0L0R8 
3880 PRINTV1,B$| 

3890 COLORO 

3900 PRINTB1,* Valori - *| 

3910 RETURN 

3920 . 

3930 '*• input dati acraan 2 
3940 

3930 . 

3960 A$ a **iLINE(C+8,1B4)-(C+16,190),1,BF 
3970 I4 a INKEYIiIFIi a **THEN3970 
3980 IFIf a CHRf(43)THENIFA$ a *‘THEN4060ELS 
E3970 

3990 IFI■ * AND(T a lANDU>1)THENT a 3iRETUR 
N 

4000 IFIt-CHRI(8)ANDU2-1THENIFU70THENLIN 

E(C+B,184)-(C+16,191),15,BFi C a C-8iN a M-li 

U"U—1160T03960IEL8E3970 

4010 IFI$ a CHRt(8)ANDAf< >**THENLINE(C+8,1 

B4)-(C+16,191),13,BFiC a C-8iAf a LEFT$(Af,L 

EN(A4)-1)I0OTO4O9O 

4020 IFII a CHRÌ(13)THEN4120 

4030 A a A8C(II) 

4040 IFU2-1THEN4060 
4030 IFA<480RA>57THEN3970 
4060 C a C+B 

4070 LINE<C,184)-(C+B,190),13,BFtPSET(C, 
104),13iPRINTI1,14 
4080 Al a A$+It 

4090 LINE(C+8, 184)-(C+16,190),1,BF 
4100 IFU2 a lTHENN a N+liAX(N)«ASC(II)iRETUR 

N 

4110 60T03970 
4120 N-M+l 


4130 AX (N)-VAL(Af)/SC 

4140 LINE(C+8,184)-(C+16,190),13,BFiC a C+ 

16iRETURN 

4130 C0L0R13,4,4iCLEARiEND 

4160 . 

4170 ' * diaagno da Fila 

4100 . 

4190 SCREEN2iB-NiM-OiS a OiAl-1iCOLORI5iFL 
■OiC0 a 13t B0SUB1840 
4200 IFA200THEN60SUB510 
4210 F0RJ-A1T0B 

4220 IFAX(J) a lllllANDFL a 0THEN4270 

4230 IFAX(J)>10000ANDFL-0THENFL a liS-JiNE 

XTJ 

4240 IFAX(J)>10000ANDFL a lTHENFL a 0iH a J-li 
80T04230IEL8ENEXTJ 

4230 ONAX(S)-1000080SUB2360,2340,2690,28 
30,2990,3140,3300,3450,3630,3800,3280,34 
30 

4260 RETURN4B10 

4270 Al-OiIFC0-1THENC0-13IRETURN4810 
4280 608UB610 
4290 60T01940 

4300 . 

4310 *" raglat. a cari, dati 

4320 ... 

4330 SCREEN11COLORI3,liNIDTH30 
4340 L0CATE3,10 

4330 PRINT*Vuoi ragiatrara i dati* 

4360 L0CATE7,12 

4370 PRINT'au caaBBtta?<a/n)* 

4380 I* a INKEY*iIFI« a *’ORIK>*S*ANDI*<>*a 

*ANDI*<>"N*ANDI»<>*n*THEN430O 

4390 IFI* a *n*0RI« a *N*THENSCREENliB0T0130 

4400 T-OiCLSiL0CATE3,lOiPRINT’noae Filai 

aan 6 car.)*iLOCATE 10,12 1 INPUTAli IFLEN<A 

*)>6THEN4400 

4410 CLSiL0CATE4,10 

4420 PRINT'Prepara il regiatratore* 

4430 L0CATE6,12 

4440 PRINT'e praai un tatto...* 

4430 HOTORON 

4460 Il a INKEY4iIFI$ a **THEN4460 
4470 BEEP 
4410 LOCATEO,20 
4490 IFT-1THEN4600 

4500 PRINTSPCI(22-LENIA4))/2)|*SAVIN6 ** 
| At| •'• 

4310 OPEN’caaiAI*FOR OUTPUT ASI2 
4320 PRINTI2,ABiPRINTB2,N,A2,Z,8C 
4530 F0RT-1T0N 
4340 PRINTI2,AX(T) 

4330 NEXTT 

4560 F0RT-1T0Z 

4370 PR!NTI2,SX(T)iNEXTT 

4380 CL0SEI2 

4390 SCREENliSOTOlSO 

4600 PRINT8PC(8)|*1oading .* 

4610 OPEN*ca«iA$"FOR INPUT ASI2 
4620 INPUTI2,A* 

4630 L0CATE16,20iPRINT*'"|A*|* ' 

4640 FORT-OTOlUOOiNEXTiT-O 
4630 INPUT«2,N,A2,Z,SC 
4660 F0RT-1T0N 
4670 INPUTB2,AX(T) 

4680 NEXTT 
4690 FORT-1TOZ 
4700 INPUTI2,SX(T) 

4710 NEXTT 
4720 CL08EI2 
4730 60T04190 

4740 . 

4750 *'• cane. opz. 

4760 ... 

4770 IFZ<1THEN4830 
4780 S—SX(Z>iAl a 2 
4790 Z-Z-l 
4800 CO"1iB0SUB4230 
4810 608UB1790 
4820 BEEPiN-S-1 


4830 C0 a 15iAl-OiRETURN20O0 

4040 . 

4850 aprita 

4060 . 

4870 F0RT-1T08 

4880 READA 

4890 A4 a A$+CHRI(A) 

4900 NEXTT 

4910 SPRITE*(0) a AI 

4920 RETURN 

4930 DATAI,2,36,40,48,60,0,128 

4940 . 

4930 

4960 ... 

4970 Z a Z+liSX(Z) a M 
4980 N»N*1iAX(H) a A3 
4990 N«N>1iAX(N) a B3+8 
3000 RETURN 

5010 . 

3020 

5030 . 

3040 LINE(190,173) — (230,182), 1,BF 
3030 C0L0R15 

5060 PSET(190,173),liPRINTIl,STRI(A3)|ST 
R4(B3+8) 

5070 IFU1-0THENRETURN 

3080 LINE(0,1B4)-<100,191),15,BF 

5090 COLORI 

5100 X-INT<(A3-X1>*SC> a V-INT <(B3-V1> *SC) 
5110 PSET(0,184),13iPRINT*l,STR*(X)|STR* 

(Y) 

3120 RETURN 

5130 . 

3140 " ' traca on 

3130 . 

3160 60SUB1840iBEEPI60SUB6lOi80SUB5090 
5170 PSET(113,184),13iCOLORIiPRINT«l,*Tr 
aca* 

3180 PSET(A3,B3+8> ,4 

3190 W-M^liAX(H)-10011iREH CODICE TRACE 

ON 

3200 S-NiU-0 
5210 60SUB4970 
3220 RETURN 

3230 . 

3240 traca oFF 

3230 . 

3260 60SUB49B0 

3270 LINE(0,185»-(70,191),13,BF 

3280 LINE(AX(S+1),AX(S»2))-(AX(S+3),AX(S 

♦4)),CO 

3290 80T03530 

3300 . 

5310 ''’ taato on 

3320 . 

3330 BEEPi608UB1B40 

3340 60SUB610 

5350 PSET (3,184),13 a COLOR 1 

3360 PRINTB1,‘taato aax 12 lat. a *iC a 150 

3370 H-Ma-ltAX(M>-10012tREM CODICE TESTO 

3380 S a NiU a OiU2-1iCO-13 

3390 60SUB4970 

5400 60SUB3960 

5410 IFII-CHR((13)THEN3440 

3420 U-U+l 

5430 IFU-12THEN3440ELSE3400 

5440 6 O 8 UB 6 IO 1 U2 a 0 

3430 COLORCOiPSET(AX(S+1),AX(S+2)),1 

3460 F0RT»S+3T0N 

5470 PRINTI1,CHR9(AX(T))| 

3480 NEXT 
3490 60T05530 

5500 . 

5510 "* 

3320 . 

3530 0NA180T03550,3360 
3540 60SUB610iRETURN1940 
3350 RETURN4220 
5560 RETURN4B10 
3570 . 12097 bytaa . 
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PIANTA 01 FABBRICATI 




delimitata interamente dal 
colore desiderato, onde evi¬ 
tare che si cancelli totalmen¬ 
te o parzialmente l'immagi¬ 
ne visualizzata sullo scher¬ 
mo. 

Nel caso però che tale erro¬ 
re sia stato commesso è co¬ 
munque possibile rimediare, 
anche se in modo un po' 
«macchinoso». Prima di tutto 
si dovrà premere il tasto C e 
cancellare cosi l'operazione 
indesiderata, quindi il tasto 
E per END (= fine elabora¬ 
zione) e registrare i dati re¬ 
lativi al disegno per poi rica¬ 
ricarli grazie aila opzione 3 
prevista dal Menù principa¬ 
le. Il disegno verrà rivisua¬ 
lizzato cosi come era prima 
di commettere l'errore. 
L'opzione TRACE è molto 
utile per tracciare linee, a 
partire dal punto prefissato. 


mediante la freccia; in bas¬ 
so. alla sinistra dello scher¬ 
mo, vengono visualizzati i 
valori delle coordinate del 
nuovo punto indicato dalla 
freccia rispetto al punto pre¬ 
fissato, cioè le coordinate 
del secondo estremo della 
linea che si vuole tracciare 
rispetto ad un sistema di ri¬ 
ferimento che abbia come 
origine il primo estremo del¬ 
la linea e assi paralleli alle 
due direzioni individuate 
dallo schermo. 

Per spiegare meglio il suo 
«funzionamento», possiamo 
dire che il procedimento 
usato da tale routine è molto 
simile a quando, disegnando 
con carta e matita, si deve 
tracciare un segmento con 
la riga dopo aver puntato i 
due estremi ed averne misu¬ 
rato la distanza. Tale opzio¬ 


ne risulta di indubbia utilità 
per la misurazione delle di¬ 
stanze e delle linee da trac¬ 
ciare o già tracciate. 

Un'altra opzione senz'altro 
molto utile è quella per l'im¬ 
missione di scritte in un 
qualsiasi punto dello scher¬ 
mo, la cui routine si può ri¬ 
chiamare premendo il tasto 
S. Con essa è possibile indi¬ 
care, ad esempio, i vari vani 
o anche immettere simboli 
grafici nella pianta. 

Altra cosa da ricordare è la 
seguente: una volta selezio¬ 
nata l'opzione per il disegno 
della spezzata, per uscire 
dalla routine si deve preme¬ 
re la barra spaziatrice. 

Per la realizzazione pratica 
della pianta è infine fonda- 
mentale seguire la seguente 
procedura: 

1) misurare e schematizzare 


su un foglio il punto prescel¬ 
to; 

2) immettere nel computer, 
come viene richiesto all’ini¬ 
zio, quella tra le due dimen¬ 
sioni della pianta - larghez¬ 
za e altezza - che risulta 
maggiore: ovviamente tale 
misura deve essere introdot¬ 
ta in centimetri; 

3) immettere il valore del re¬ 
ticolo (anch'esso in cm.), va¬ 
lore che indica la distanza 
tra due punti contigui dello 
stesso ed aventi la stessa 
ordinata (molto utile in fase 
di EDITING del disegno); 

4) disegnare utilizzando tut¬ 
te le opzioni e cercando di 
acquisire una certa pratica 
prima di eseguire il disegno 
finale; 

5) registrare su cassetta il 
lavoro ultimo o momenta¬ 
neamente interrotto. 


MSX 

GALACTICA 

Un pianeta isolato per 
un implacabile assedio nemico... 


VIDEOGAME 
di F. Russo 



FACILE 



Tempo 
di esecuzione 

2 ORE 


'IH ella galassia HVPE- 
iìi RON, l’astronave 

.iiiGAL-1 è impegnata 

nella difesa del pianeta 
TRIADI assalito da un'orda 
di astronavi aliene e batta¬ 
gliere che stanno tentando 
tenacemente di conquistar¬ 
lo. 


Compito specifico della 
GAL-1 è portare aiuto e viveri 
al pianeta ormai isolato dagli 
altri mondi a causa dell'im¬ 
placabile assedio nemico. 
Stando così le cose, la mis¬ 
sione dell'astronave amica 
non risulta certo facile! 
Naturalmente le navette dei 


nemici invasori fanno di tutto 
per impedire che la GAL-1 
raggiunga Triadi, attaccan¬ 
dola instancabilmente e cer¬ 
cando quindi di distruggerla 
con i loro schermi Anti-Ma¬ 
teria. 

Per difendersi dagli attacchi 
alieni, l'astronave ha a di¬ 


sposizione dieci missili ad 
Energia Dicotonica, che pe¬ 
rò possono essere lanciati 
soltanto quando essa si tro¬ 
va sulla verticale della na¬ 
vetta aliena e vi sia diretta 
contro. 

Una volta terminata la riser¬ 
va di missili, l'unica difesa 
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STRUTTURA DEL PROGRAMMA 


10-550 

560-880 

890-1100 

1110-1230 

1240-1380 

1390-1530 

1540-1610 

1620-1790 

1800-1920 

1930-2020 

2030-2130 

2140-2260 

2270-2420 

2430-2530 

2540-2630 


inizializzazione 
loop principale 

definizione di nove sprites 8x8 

routine «lancio missile» 

controllo sprites sovrapposti 

effetto sonoro: esplosione 

punteggio e numero astronavi colpite 

navetta aliena colpita 

consegna viveri a TRIADI 

routine di fine gioco e richiesta nuova partita 

scritta iniziale «GALACTICA» in SCREEN 3 

colonna sonora: «Galactica» dei Rockets 

scelta controllo GAL-1 (tastiera o joystick) 

effetto sonoro: rumore di sottofondo 

effetto sonoro: lancio missile 


che rimane alla GAL-1 è 
tentare la fuga, cercando di 
raggiungere comunque la 
meta prefissata, ma tenen¬ 
dosi a debita distanza dagli 
schermi Anti-Materia delle 
navette nemiche. 

I comandi per dirigere 
GAL-1 possono essere «co¬ 
municati» al comandante 
tramite tastiera (tasti curso¬ 
re e barra spaziatrice) o joy¬ 
stick. 

L'astronave può essere gui¬ 
data in tutte le direzioni e 
deve consegnare i viveri ne¬ 
cessari alla sopravvivenza 
degli abitanti del pianeta at¬ 
taccato, in basso sulla sini¬ 
stra dello schermo, dove si 
trova una piattaforma avente 
forma di rettangolo e di colo¬ 
re nero (tenere presente che 
il pianeta TRIADI è contorna¬ 
to da un anello blu di polvere 
cosmica). 

Tre sono le astronavi a di¬ 
sposizione e 100 sono i punti 
guadagnati per ogni missio¬ 
ne portata felicemente a ter¬ 


mine. Inoltre per ogni navet¬ 
ta aliena colpita si guada¬ 
gnano ulteriori 20 punti. 

Il programma è accompa¬ 
gnato dalle note della famo¬ 
sa canzone dei Rockets «Ga¬ 
lactica» e da vari effetti so¬ 
nori. 

Per quel che riguarda il pro¬ 
gramma, ogni sovrapposi¬ 
zione di sprites è controllata 
da una apposita routine (li¬ 
nee 1270-1380) che «segue» 
le coordinate degli stessi 
per individuare quelli venuti 
a contatto — alieno con alie¬ 
no, alieno con GAL-1, missili 
con alieno — e per saltare, a 
seconda dei casi, alle varie 
routines di collisione ed 
esplosione. 

Il salto a questa routine di 
sovrapposizione è effettuato 
mediante l'istruzione «ON 
SPRITE GOSUB», abilitata 
da «SPRITE ON», e viene tal¬ 
volta interrotto per circa 1/10 
di secondo tramite «SPRITE 
OFF» quando le figure so¬ 
vrapposte sono quel¬ 


le delle due astronavi aliene 
che appaiono sullo schermo. 
La pausa, durante la quale è 
disabilitato l’interruttore di 
sistema degli sprites perché 
non si inneschi un loop inter¬ 
minabile in seguito a questa 
ultima evenienza, è invece 
fissata tramite la linea 480 
che opera attraverso l’orolo¬ 
gio interno al computer stes¬ 
so e fa saltare il programma 
alla routine che si trova alla 
linea 1380, trascorso il tem¬ 
po previsto. 

È buona norma usare questo 
metodo ogni volta che si 
debba controllare le collisio¬ 
ni di sprites «settando» ade¬ 
guatamente i valori dell’in- 
tervallo ed eseguendo cor¬ 
rettamente i controlli sulle 
coordinate. 

Molto importante, per non 
pregiudicare la velocità di 
esecuzione, è anche evitare 
di inserire nel programma 


troppe istruzioni IF, o perlo¬ 
meno strutturare quelle ne¬ 
cessarie il più possibile tra¬ 
mite gli operatori logici. 
Risulta dunque evidente che 
è molto importante conosce¬ 
re a fondo le potenzialità del 
proprio computer, le istru¬ 
zioni a disposizione e le tec¬ 
niche di programmazione in 
modo da affrontare corretta- 
mente i problemi inerenti la 
progettazione di un video- 
-game e renderlo il più com¬ 
pleto e veloce possibile. 
Naturalmente tutto ciò di¬ 
venta più facile con l’espe¬ 
rienza anche se questa deve 
sempre essere accompa¬ 
gnata da una buona dose di 
inventiva. 

Saper programmare bene in 
BASIC può anche far scorda¬ 
re la incredibile velocità del 
Linguaggio Macchina, ren¬ 
dendo soddisfacenti i propri 
programmi. 



» 


VARIABILI 

U1/U2 

= ascissa e ordinata dei missili da lanciare 

D 

= numero figura sprites missile nel quadra¬ 
tino a sinistra 

GA 

= numero GAL-1 in gioco (tre all’inizio) 

se 

= punteggio 

X,Y 

= coordinate GAL-1 

X1.Y1 

= coordinate ultima posizione di GAL-1 

N 

= numero fig. sprites delle due navette aliene 

Q/P 

= coordinate navetta aliena 1 

l/R 

= coordinate navetta aliena 2 

JO 

= tastiera o joystick 1/2 

T, J, B, S 

= incremento coordinate GAL-1 

W 

= flag lancio missile 

DI 

T, H, L, 
K, V, O, 

= flag viveri 

X2, Y2 

= variabili di servizio 

A$, B$ 

= stringhe macrocomandi per play 


IO .-. 170 LINE <0,0)-(40,191),4,BF 320 PR[NT*1,"GAL " 

20 . . 180 LINE <2,41 — (37,38) f 0,BF 330 L1 NE(0,92)-(40,105),,B 

30 • • GALACTICA 1 190 LINE(14,48)-(26,601,0,BF 340 LINE(9,132)-(31,145),,B 

40 ‘ Toihib». by 200 F0RT-0T050iPSET<INT(RND(-TIME)»20l>♦ 350 JO-3 

30 ’ ’ ‘ ‘ 50,INT(RND(-T*TIME)*191)):NEXT 360 D-4 

60 ’HX-IO • • scritto 1 1 lift 1 210 F0RT-0T030:CIRCLE(180,10),T,8:NEXTT 370 F0RU2-6T026STEP10 

20 ‘.‘ dj •.• 220 CIRCLE(180,10),65,4,3 380 F0RU1«4T034STEP12:D-D+1 

00 ’ i»sx ! FABRIZIO RUS^O ! -sx ' 230 CIRCLE ( 180,10),45,43 390 PUTSPRITED,(U1.U2),,3 

’0 .-. 240 PSET(41,150), 1 400 NEXTU1,U2:D-14 

100 C0L0R15,1,1 250 PAINT(230,10),4 410 PUTSPRITED,(17,49),,3 

110 SCREEN3 260 FORT«0T016:CIRCLE(71,180),T,8:NEXT 420 IF01* 1THEN01«0:RETURN 

120 OPEN-GRP:"AS1 270 LINE(40,0)-(255,191 ), 15,B 430 V-4:GA-3:SC-0: 0-8 

130 G0SUB2060 280 LINE(170,7)-(190,17),0,BF 440’ 

140 80SUB2170 290 PSET<1,80),4 450 * inizializzaziont 

150 SCREEN2,0,0 300 PRINTI1,"SCORE" 460 * 

160 G0SUB920 310 PSET( 10,120),4 470 0NSPRITEG0SUB1270 
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480 0NINTERVAL-1080SUBI380 
490 ' 

500 T-OiJ-OiX-67iY-1481S-8tXl-11Vl-YiB-6 
510 N-V-N 

520 B-50iR--10il-200iP—10iU-0 
530 60SUB13B0ITinE-OtH-OiMl-liDl-O 
540 60SUB1570 
550 A a l i60T0590 
540 ‘ 

570 ' fluito principila 

580 ' 

590 IFJO-3THENS08UB2300 
400 S0UND7,1810111100 
410 608UB2210 
420 F0RH-0T02800iMEXTiT-0 
430 PUTSPRITEO,(X,Y),15,1 
440 B0SUB1880 

450 IFSTRIB(JO) a -lANDJ< >0ANDD>4THEN80T01 

140ELSE440 

440 A-STICK(JO) 

470 ONA60SUB490,700,710,720,730,740,730, 
740 

480 80T0770 

490 T-OiJ—8tRETURN480 

700 T-BiJ—BiRETURN480 

710 T*SiJ a OiRETURN480 

720 T-BtJ a BiRETURN480 

730 T*OiJ a SiRETURN480 

740 T—BiJ-BiRETURN480 

750 T—SiJ-0iRETURN480 

740 T—BiJ—BiRETURN4B0 

770 X-X+TiY-Y+JiL—S 8N(X-B)lH—SBN(Y-R) i 

B-8-5*LiR«R-3«HiL—SBN(X-I) iH—S6N ( Y-P) : 

I a I-3#L:P a P-3*H 

780 IFX>2480RY>1780RX<450RY<0THENX«X1:Y* 
Y1iT«OiJ"Oi60T0790 
790 0ND160T0820 

800 IFABS(X-1B0)<4AN0ABS<Y-4X4THEN80SUB 
1830ELSEPUTSPRITE4,(X,Y+8),,8 
810 60T0830 

620 IFABS (X-48X4ANDABS (Y-l 54) <4THENDl a 0 

:PLAY*T253L14BABFEDCT130L8*!SC a SCMOi80S 

UB1570iF0RH a 0T0400iNEXTiB0SUB2440 

830 PUTSPRITEO,(X,Y),15,1 

840 PUTSPRITE2,(B,R),7,M 

850 PUTSPRITE3,(I,P),8,N 

840 IFTIHE>20ANDDlTHENTIME a 0iBl a 0-BliPUT 

SPRITE4, (47,154), ,0X8 

B70 Xl-XiYl-Y 

880 80T0430 

890 ' 

900 * ■ p r 1 t a a 

910 * 

920 REST0RE1020 

930 F0RJ-0T08 ' 9 SPRITES 

940 A*-" 

950 F0RT-1T0B 

940 READA 

970 A# a A4*CHRI(A) 

980 NEXTT 
990 SPRITE*(J)-AB 
1000 NEXTJiRETURN 
1010 RETURN 

1020 DATA255,129,231,24,24,231,129,255 
1030 DATA153,145,235,124,90,40,90,129 
1040 DATA48.40,14,14,14,40,14,0 
1030 DATAO,14,40,14,14,14,40,48 
1040 DATAO,0,28,28,54,85,85,73 
1070 DATA13B,4,8,1,4,42,0,21 
1080 DATA144.3.44,14,132,0,19,44 
1090 DATA73,0,148,132,34,129,32,128 
1100 DATA24,24,24,44,34,34,44,0 
1110 ' 

1120 * «paro alatila 

1130 ' 

1140 IFJ a STHEN8 a Y*17iHl a 208iL a 8ELSE6 a Y-8 

IH1—20IL—BiF-2 

1130 IFL-BTHENF-2ELSEF-3 

1140 D-D-liN-1 

1170 80SUB2370 






UBO F0RE-8T0H1STEPL 

1190 PUTSPRITEDM,(X,E),,F 

1200 NEXTE 1 PUTSPRITEO,(17,49),,3 

1210 60SUB2440 

1220 H -0 

1230 60T04S0 

1240 ' 

1250 ' incontro apritea 

1240 ' 

1270 IFM a 1THENPUTSPRITED+1,(0,209) 1 60T01 
450 

1280 IF(ABS (X-l)+ ABS(Y-P))> 8 AND(ABS(X-B) 

♦ ABS (Y-R))>BTHEN60SUB1370 1 RETURN 

1290 60SUB1420iSPR1TE0FF 

1300 F0RK-1T050 

1310 F0RT-5T07 

1320 PUTSPRITEO,(X,Y) ,T,T 

1330 NEXTT,K 

1340 IFDl a 0THENF0RT a Y*8T0209iPUTSPRITE4, 
(X,T),, 81 NEXT 

1350 6A-6A-1IIFGA-0THEN1940 
1340 01 — 1 1 60SUB340iRETURN500 
1370 SPRITEOFFiINTERVALONiRETURN 
1380 SPRITEONjINTERVALOFFiRETURN 
1390 ’ 

1400 ' aaploaiona 

1410 ' 

1420 PE-30 

1430 SOUNDO,OtSOUND1,5 
1440 S0UND2,0iS0UND3,PE-17 
1450 S0UND4,255iS0UND5,PE-15 
1440 S0UND4,PE:S0UND7,0 
1470 S0UND10,14:G0T01510 
1480 S0UND8,14:S0UND9,14 
1490 SOUND 11,0:S0UND12,5 
1300 S0UND13.0 
1510 F0RT-0T03:NEXT 
1320 SOUND 12,54:SOUND 13,0 
1530 RETURN 
1540 • 

1550 ' punteggio 

1540 ' 

1570 LINE(1,95)-(39,104),4,BF 

1580 LINE(11,135)-(29,144),4,BF 

1590 PSET<2,93),4iPRINTBl,USING* 66666 *|S 

C 

1400 PSET(10,135),4iPRINTBl,6A 
1410 RETURN 
1420 ' 

1430 * alieni colpiti 

1440 ' 

1430 IFABS(E-PX20ANDABS(X-I)<20THENU a 3t 

Y2-PiI a 40+RND(-TIRE)»200iP a 200i80T01470 

1440 Y2 a RiU a 2iB a 40+RND(-TIRE)*200iR*-10 

1470 SPRITEOFF 

1480 PE"70i80SUB1430 

1490 F0RK-1T010 

1700 F0RT-5T07 

1710 PUTSPRITEU,(X,Y2) ,T,T 

1720 NEXTT,K 

1730 PUTSPRITEU,(0,209) 

1740 N-0 

1730 G08UB1380 

1740 SC a SC+20i60SUB1570 

1770 60SUB2440 

1780 PUTSPRITEO,<17,49), ,3 

1790 RETURN450 

1800 ' 

1810 * conaagna 

1820 * 

1830 Dl-1 

1840 PUT8PRITE4,(42,178),,8 
1850 SC-SCMOO 
1840 608UB1570 

1870 PLAY*T255L14CDEF6ABT150LB* 

1880 F0RK-207T01348TEP-.4 
1890 PUTSPRITE4,(47,K ),,8 
1900 NEXTK 
1910 60BUB2440 
1920 RETURN830 


1930 » 

1940 ' fina gioco 

1930 * 

1940 N-1SI6A-0I60SUB1570 
1970 COLORNiPSET(100,100),1 
I960 PRINTBl,’ANOTHER GARE?* 

1990 IFN-1THENC0L0R15I60T0340 

2000 I$ a INKEY$iIFI6 a **THEN2010 

2010 IFIK >*Y*ANDI*<>*y*ANDI*< >*N*ANDI#< 

>*n*THEN2000 

2020 IFI6 a *S*0RI* a “a"THENN a li80T01970ELS 
EEND 

2030 * S 

2040 ‘ acritta '6ALACTICA* 

2030 * 

2040 A* a *8ALACTICA* 

2070 F0RT-1T09 

2080 PSET(T*24,80),1 1 COLORT♦1 
2090 PRINTBl,HID6(A6,T,1> 

2100 FORY-OTOlSOiNEXT 
2110 NEXT 
2120 C0L0R13 
2130 RETURN 
2140 ' 

2150 ' ausica iniziala 

2140 ' 

2170 PLAY*VI1H3000T150L8*,*VI1S0N4000T15 
0L8* 

2180 RE6T0RE2250 
2190 READAt,Bt 

2200 PLAY*XAB|XA$|*,*XBI|R4XBf|* 

2210 RESTORE 2240 
2220 READA*,B* 

2230 PLAY*XAB|*,*XB6|* 

2240 RETURN 

2250 DATA*DER8GRBF+ER803B04C8RBCDAR8*,*0 
3R8ER4EER4R8CR4R8D* 

2240 DATA*DERB6RBF+ER8DER86R8F«ER8EF+6F+ 
8F*8F+6F+*,"03R8ER4EER4R8CR4R8CR4R802BBB 
B03BBBB02B* 

2270 * 

2280 ' acalta coaandi 

2290 ' 

2300 T a 13 

2310 COLORT 

2320 PSET(80,80) ,1 

2330 PRINTBl,*1) KEYBOARD* 

2340 PSET(80,100),1 

2350 PRINTBl,*2) JOYSTICK port 1* 

2340 PSET(80,120), 1 

2370 PRINTBl,*3) JOYSTICK port 2* 

2380 IFT-lTHENCOLORISiRETURN 
2390 IS-INKEY* 

2400 IF I •■* *ORVAL ( IB) >3 OR VAL (IIX1THEN23 
90 

2410 JO-VAL(IB)-1 
2420 T a l 1 G0T02310 
2430 ' 

2440 ’ auono aottofondo 

2450 ' 

2440 SOUNDO,0 

2470 S0UND1,12 

2480 80UND7,tB10111110 

2490 S0UND8,14 

2500 S0UND11,0 

2510 S0UND12,2 

2520 S0UND13,14 

2330 RETURN 

2340 ' 

2350 ' aparo 

2540 ' 

2570 S0UND4,10 

2580 S0UND7,4810011111 

2390 80UND10,14 

2400 S0UND11,0 

2410 S0UND12,14 

2420 S0UND13.9 

2430 RETURN 
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SEGA sc3000 


VIDEOGAME 

di M. Truscelli 



IL BOSCO MALEDETTO 

Divertente gioco avventuroso 



MEDIA 

DIFFICOLTA 


i 

Tempo 

di esecuzione 

3 ORE 


i!i|ÌÌpare il punto sulla si- 
!jÌÌ|Ì tu azione dei giochi 
i!l:::l!iiiil di avventura è at¬ 
tualmente molto difficile. 
Si va da esempi classici 
come The Hobbit' della 
Melbourne House a Kni- 
ght Lore della Ultimate, 
ad altri ancora estrema- 
mente sofisticati, ultravo¬ 
raci di memoria RAM. La 
caratteristica che unisce 
gran parte di questi gio¬ 
chi, è l'essere concepiti 
come un'immaginaria 


mappa a due dimensioni, 
generalmente contenute 
in una matrice. All’interno 
di questa mappa vengono 
disseminati, prima che il 
gioco vero e proprio ab¬ 
bia inzio, una certa quan¬ 
tità di ostacoli, pericoli e 
situazioni «strane». 
Esistono due modi per 
disseminare gli ostacoli: 
il primo è quello di disse¬ 
minarli sempre nelle me¬ 
desime condizioni, ma 
con questo sistema si 


corre il rischio che il gio¬ 
catore si munisca di carta 
e penna e segnando tutte 
le proprie mosse finisca 
con il riuscire a tracciare 
la mappa del gioco per¬ 
dendone in tal modo il gu¬ 
sto; il secondo modo è 
quello di affidare la distri¬ 
buzione degli ostacoli ad 
una opportuna routine 
RANDOM e quindi in ma¬ 
niera del tutto casuale. 
Altra caratteristica è la 
quasi totale assenza, sal¬ 


vo alcuni casi «mangia- 
memoria», di grafica; so¬ 
lo qualche volta, se se ne 
ha una buona quantità a 
disposizione, si cambia¬ 
no i caratteri inventando¬ 
ne di nuovi per dare un 
tocco di eleganza alle 
scritte che illustrano sullo 
schermo la situazione del 
gioco. Al posto della gra¬ 
fica si preferisce privile¬ 
giare le routines sonore 
o il succedersi dei colori 
sullo schermo per le va- 


STRUTTURA DEL PROGRAMMA 


1-100 Inizializzazione del programma, schermo di 
presentazione e salto alla routine musicale. 

110-170 Routine di richiesta di una eventuale visualiz¬ 
zazione delle istruzioni di gioco. 

180-250 Selezione del livello di difficoltà (1 difficile - 3 
facile). 

260-290 Generazione RANDOM sulla base del livello 
di difficoltà inserito, dell’estensione della su¬ 
perficie del bosco. 

300-310 Dimensionamento della variabile S e salto al¬ 
la routine di determinazione della direzione 
di cammino. 

330-390 Generazione casuale della variabile ES, tra¬ 
mite essa vengono definiti gli ostacoli nel 
corso del gioco. 

400-450 Situazione corrispondente al ritrovamento di 
un cestino con le provviste e risposta del gio¬ 
catore alla domanda: «Ne mangi qualcosa?». 

450-490 Determinazione casuale del fattore RISCHIO 

in base a cui il computer «addormenta» o no 
il giocatore se il pasto si dimostra troppo pe¬ 
sante. 

500-590 Seconda situazione: corrisponde all’incontro 

con il pazzo con l'ascia e propone quattro 
possibilità per affrontare la situazione. 

600-700 Prima possibilità: il giocatore è catturato dal 
pazzo con l'ascia, se le sue condizioni lo per¬ 
mettono può provare a fuggire oppure il gio¬ 
co finisce. 

710-770 Seconda possibilità: il giocatore spara un col¬ 
po al pazzo, se la mira è precisa lo uccide, 
altrimenti lo manca, in questa fase bisogna 
tener conto delle munizioni di cui si è in pos¬ 
sesso. 

780-810 Terza possibilità: il giocatore si nasconde ed 


820 

830-840 

850-1020 


1040-1200 


1210-1360 


1370 

1380-1480 

1490-1530 

1540-1560 

1570-1710 


aspetta l'evolversi degli eventi. 

Quarta possibilità: il giocatore attacca il paz¬ 
zo con il cacciavite. 

Terza situazione: un serpente velenoso mor¬ 
de il giocatore. 

Quarta situazione: il giocatore cade in una 
fossa e gli vengono offerte due possibilità. La 
prima è aspettare nella fossa che arrivino de¬ 
gli aiuti, l'altra è tentare di uscire con le pro¬ 
prie forze e l'aiuto delle corde di cui è in pos¬ 
sesso. Se si preferisce aspettare che arrivino 
gli aiuti, può accadere che il computer sug¬ 
gerisca di provare con le proprie forze. 

Quinta situazione: il giocatore ha sete e nel 
suo cammino giunge alle rive di un laghetto. 
Le proposte del computer sono: fermarsi e 
pensare cosa fare, bere l’acqua che potrebbe 
però essere avvelenata oppure fare finta di 
niente ed andare avanti. 

Questa routine permette di comunicare al 
computer la direzione in cui ci si vuol dirige¬ 
re; effettuata inoltre un test di controllo sullo 
stato di efficienza delle batterie della torcia 
elettrica e sull'eventuale vicinanza di una ca¬ 
sa nel bosco. 

Avverte il giocatore che si trova sulla buona 
strada per raggiungere una casa. 

Routine di fine gioco, congratulazioni e ri¬ 
chiesta di una eventuale ripetizione. 

Routine sonora per la creazione della musi¬ 
chetta che accompagna i momenti salienti 
del gioco. 

Routine sonora per il BEEP che indica la 
pressione di un tasto (vedi l’introduzione). 
Blocco di istruzioni concernenti la visualizza¬ 
zione delle norme e delle indicazioni riguar¬ 
danti il gioco. 
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SEGA 


SC 3000 

IL BOSCO MALEDETTO 


1720 Ritardo per la lettura delle informazioni vi¬ 

sualizzate sullo schermo. 

1730-1840 Pagina grafica in alta risoluzione animata 
che indica la rottura o l'esaurimento della 
torcia elettrica. 

1850-2000 Ridefinizione del set di caratteri maiuscolo e 
minuscolo. 

2010-2030 Routine per il «PREMI UN TASTO PER CONTI¬ 
NUARE». 


Essendo il programma piuttosto complesso consigliamo 
ai lettori meno «disposti» a digitarlo per intero di esclu¬ 
dere quelle routines che ritengono superflue, come la ri¬ 
definizione dei caratteri o la visualizzazione delle istru¬ 
zioni del gioco. Questa ultima nota è in netta contraddi¬ 
zione con guanto affermato nell'introduzione, ma con i 
tempi che corrono, (è agosto), non tutti saranno disposti a 
passare le ore di svago davanti ad uno schermo televisi¬ 
vo. 


1' REM :::::::::::::::::::::::::::::: 

2 REM : : 

3 REM : IL BOSCO MALEDETTO : 

4 REM : : 

5 REM : Massimo Trosce l l l : 

6 REM : : 

? REM : CC) 1985 LIST : 

8 REM : : 

9 rem :::::::::::::::::::::::::::::: 

10 REM 
20 REM 

30 CLS:SCREEN 2,2:CLS:C0L0R4,1,C0,03-C 
254,1913,1:GOSUB 1850 
40 POR L=1 TO 50 

50 PX=INTCCRNOC13*303+ 13*8:PY=INTCCRND 
C 1 3*233 + 1 3*8 :IF PY>80 AND PY <130 THEN 
70 

60 CURSORPX,PY:PRINT”*“ 

70 POR T=1 TO 25:NEXT T:NEXT L:COLORll 
,2 

80 CURSOR20,95:PRINTCHR*(17 3 ; "I L B 0 
S C 0" 

90 CURSOR40,115:PRINT"M A L E D E T T 
0"JCHRSC163 
100 GOSLIB 1490 

110 CLS:SCREEN 1,1 :CLS :COLOR15,4 
120 CURS0R3,2:PRINT"Uuol le istruzioni 
del gioco ?" 

130 CURSOR14,20:PRINT"Premi S'N" 

140 R*=INKEY*:IFR$="" THEN GOTO 140 
150 IP R»=”S" THEN GOSUB 1540:GOSUB 15 
70:GOTO 180 

160 IF R*="N" THEN GOSUB 1540:GOTO 180 
170 GOTO 140 

180 CLS:C0L0R15,1:CURS0R1,1:PRINT"Live 
Ilo di dlf ficoIta’ ":CURSOR 1,3:PR1NT"1 
Di Mici le " :CURS0R1,5 :PRINT"2 Medio" 
:CURS0R1,7:PRINT"3 Facile" 

190 PRINT:PRINT SCOLORI 1,1 :CURSORl,9:PR 
INT"Scegll 1-2 o 3 ?" 

200 Rt=INKEY*:IF R* = "" THEN GOTO 200 
210 GOSUB 1540:CURS0R19,9:PRINTR* 

220 IF R»="1" THEN OL=20:GOTO 260 

230 IF RS="2" THEN DL=35:GOTO 260 

240 IF R*="3" THEN DL=50:GOTO 260 

250 CURSOR19,9 SPRINT" ":30T0 200 

260 LN=INT CRNDC1 3*403♦10 

270 LS=C50-LN3 

280 LE=INTCRNDC13*403+10 

290 LO=C50-LE3:B=3:S=50 

300 GOSUB 1200 

310 S=75 

320 REM 

330 ES=INT CRNDC1 3*203♦1 
340 IF ES=1 THEN GOTO 400 
350 IF ES=2 THEN GOTO 510 
360 IF ES=4 THEN GOTO 850 
370 IF ES=5 THEN GOTO 1040 
380 IF ES=3 THEN GOTO 520 
390 GOTO 300 


400 CLS:PRINT"HaI trovato un cestino d 

I appetitose provviste." 

410 PRINT"Ne mangi qualcosa ?":CURSORl 
3,10 :PRINT"S^N" 

420 R«=INKEY$:IF R* = "" THEN GOTO 420 
430 IF R«="N“ THEN GOSUB 1540:GOTO 300 

440 IF R*="S" THEN GOSUB 1540 

450 RISCH10= INTCRNOC 1 D*331 : IF RISCHIO 

=1 THEN GOTO 480 

460 IF R«<>"S" AND R*<>"N" THEN GOTO 4 
20 

470 GOTO 300 

480 CURSOR0,5 :PRINT" I l pasto era pesati 
te e tl addormenti per un’ora. La tor 
eia nel frattempo si scarica." 

490 GOSUB 1720:S=S-CDL^53:GOTO 300 
500 REM 

510 IF ES=2 THEN 830 

520 IF ES=3 THEN CLS:PRINT"Un grido ta 
glia l’aria della notte. Un pazzo co 
n l’ascia si dirige verso di TE 9":PR 
INT :PRINT"Cosa fai ?" 

530 CURS0R3,5:PRINT"1 TI mostri cortes 
e":CURS0R3,6 :PRINT"2 Spari un colpo":C 
URS0R3,7:PRINT"3 Cerchi un rifugio":CU 
RS0R3,8 :PRINT"4 Attacchi con II caccia 
vite" 

540 PRINT :PRINT"Scegli 1-2-3 o 4" 

550 R*=INKEY$:IF R$="" THEN GOTO 550 
560 IF R$="1" THEN GOTO 600 
570 IF R*="2" THEN GOTO 710 
580 IF R*="3" THEN GOTO 780 
590 GOTO 820 

600 GOSUB 1540 :IF S>80 THEN CLS:PRINT" 

II pazzo tl ha trovato. 

Cosa tl Tlserva II futuro ?":GOTO 530 
610 IF S<80 THEN CLS:PRINT"Il pazzo tl 
ha imprigionato. Cosa tl acc 

adra’ In questa sudicia cella ?":GO 

SUB 1720 

620 GOSUB 1490 5CLS : PRINT"Orma I sei spa 

cciato9":G0T0 1400 

630 RISCHIO=INT CRNDC13 * 3 3♦1 

640 S=S-10 

650 IF RISCHI0=1 THEN CLS :PRINT"Hai de 
cls o di" 

660 PRlNT"evadere dal mostro ?99":G0SU 

B 1720:G0T0 1220 

670 PRINT“Tl r iprende 9" 

680 IFS<70 THEN GOTO 620 
690 DL=DL-1 

700 CLS:PRINT"Cosa vorresti fare ?":PR 
INT :G0T0 530 

710 GOSUB 1540 :CLS SPRINT"Spari un coI p 
o 999":GOSUB 1720 
720 B=B-1 

730 IF B<=0 THEN CLS:PRINT"HaI finito 
le munIzionI.":GOTO 620 
740 RISCH10=INTCRNDC13*33+1 sIF RISCHIO 
> =2 THEN GOTO 750 


750 GOTO 770 

760 PRINT :PRINT"Lo hai- ucciso 9":GOSUB 
1720sGOTO 300 

770 S=S-10:PRINT :PRlNT"Lo hai mancato 

9" : GOSUB 172O:G0T0 700 

780 GOSUB 1540 :CLSSPRINT"Il pazzo tl g 

Ira Intorno e aspetta 99"sGOSUB 1720 

790 RISCHIO=INTCRNDC13*23+1 

800 IF RISCH10=1 THEN GOTO 760 

810 PRINT :PRINT"RImane un’ultima possi 

bllIta’"sGOSUB 1720SGOTO 300 

820 GOTO 760 

830 CLSsPRlNV'TI sei fatto mordere da 
un serpente velenoso" 

840 GOSUB 1720SGOTO 920 

850 CLSsPRINT"Mentre camminavi sei cad 

uto In una fossa. Cosa fai ?" 

860 CURSOR3,5:PRINT"1 Aspetti un aiuto 

870 CURSOR3,7:PRINT"2 Provi ad uscirne 
con le corde" 

880 PRINTsPRINT"Cosa scegli 1 o 2 ?" 
890 R$=INKEY* :IF R* = "" THEN GOTO 890 
900 IF R* = "1" THEN GOSUB 1540SGOTO 940 

910 IF R* <>"2" THEN GOTO 890 

920 RISCHI0=I NTCRNDC13*33 + 1 sIF RISCHIO 

=1 THEN GOTO 620 

930 PRINTsPRINT"Te la sei scampata 9"s 

GOSUB 1720:S=S-10 sGOTO 300 

940 RISCH10=INTCRNDC13*43+1 

950 IF RISCH10=1 THEN GOSUB 1490:PRINT 

:PRINT"MorIrai di fame...9”:GOTO 1400 

960 PRINT :PRINT"Gli aiuti non arrivano 

. UuoI provare con le corde ?" 

970 PRINT“RlspondI S oppure N" 

980 R$=INKEY$:IF R$ = "" THEN GOTO 980 
990 IF R4="S" THEN GOSUB 1540:GOTO 920 

1000 IF R*="N" THEN GOSUB 1540:GOTO 62 
0 

1010 GOTO 980 

1020 GOSUB 1540:GOTO 980 

1030 REM 

1040 CLS:PRINT"Camminando giungi ad un 
laghetto. Hai molta sete. Cosa f 

al ?" 

1050 CURS0R3,5:PRINT"1 Bevi l’acqua de 
l laghetto" 

1060 CURSOR3,7:PRINT"2 Mediti su cosa 
fare" 

1070 CURSOR3,9 :PRINT"3 Prosegui facend 
o finta di niente" 

1080 PRINT:PRINT"Scegli 1 - 2 o 3 ?" 
1090 R*=INKEYi:IF R*="" THEN GOTO 1090 

1100 IF R* = "1" THEN GOSUB 1540:GOTO 11 
40 

1110 IF R*="2" THEN GOSUB 1540:GOTO 11 
70 

1120 IF RS="3" THEN GOTO 1190 
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1130 GOTO 1090 

1140 RISCHI0=1 NTCRNDC13*33 + 1 :IF RISCHI 
0=1 THEN PRINT :PRINT"L’acqua era &uuel 
enata 8" :GOTO 620 

1150 GOSUB 1540:CLS :PRINT"TI e’ andata 
bene ...L’acqua e’ pura" 

1160 PRINT"...Per adesso 995":GOSUB 17 
20:S=S+5:G0T0 300 

1170 PRINT :PRINT"f1entre eri preso dal 
tuoi pensieri non tl sei reso conto 
che la torcia tl era caduta in acqu 
a 8 SS" 

1180 GOSUB 1720 :S=S-(S-'2) :GOTO 300 
1190 S=CS/2):GOTO 300 
1200 S=C S-2) 

1210 CLS :C0L0R15i 1 

1220 PRINT"Le direzioni in cui puoi dì 
r l g e r t 1 " 

1230 CURS0R6)3:PRINT"1 Nord":CURSOR25 
i3:PRINT"2 Sud":CURS0R6,5:PRINT"3 Es 
t" :CURS0R25,5:PRINT"4 Ovest" 

1240 COLORII, 1 .-CURSORI ,8 :PRINT"Sceg l l 
1-2-3 o 4 ?" 

1250 DI*=INKEY* : IF DI* = "" THEN GOTO 12 
50 

1260 DL=DL-1:CURSOR20,8:PRINTDI* 

1270 GOSUB 1540: IF Dl_=0 THEN CLS:PRINT 
"Non hai piu* scampo 8":C0L0R15,1:GOSUB 
1720:GOTO 1400 

1280 IF 01S = "1" THEN LN=LN-1:LS=LS+1 :G 
OTO 1330 

1290 IF DI$="2" THEN LN=LN+1 :LS=LS-1 :G 
OTO 1330 

1300 IF DI*="3" THEN LE=LE-1:L0=L0+1 :G 
OTO 1330 

1310 IF DI$="4" THEN LE=LE+1:L0=L0-1 :G 
OTO 1330 

1320 CURSOR20,8:PRINT" ":GOTO 1250 
1330 IF LN=0 OR LO=0 OR LS=0 OR LE=0 T 
HEN 1380 

1340 IF S<=10 THEN CLS:SCREEN 2,2:G0SU 
B 1730 :GOSUB 1720:SCREEN l,l:GOTO 1400 

1350 IF LN=3 OR LS=0 OR LE=3 OR L0=3 T 
HEN 1370 
1360 RETURN 

1370 CLS : COLOR 15,1 :PRINT"Sei proprio a 
pochi Km da casa.":GOSUB 1720:RETURN 
1380 CLS:C0L0R15,1:PRINT"Congratu tazIo 

n I 8" 

1390 PRINT"Hal trovato la salvezza." :P 
RINT 

1400 C0L0R15,1:PRINT:PRINT"Ouoi giocar 
e ancora ?" 

1410 PRINTiPRINT :PRINT 
1420 PRINT" S/N" 

1430 R*=INKETS: IF R*="" THEN GOTO 1430 

1440 IF R$="S" THEN GOSUB 1540:GOTO 11 
0 

1450 IF R*="N" THEN GOSUB 1540:GOTO 14 
70 

1460 GOTO 1430 

1470 CLS SCOLORI5,1:PRINT"GrazI e per av 
ermi accompagnato nella passeggiata n 
otturna nel bosco." 

1480 PRINT:PRINT:PRINT" Per adesso... 
ARRIUE0ERCI.8" :EN0 
1490 READ N: IF N=1 THEN GOTO 1510 
1500 READ D:SOUND 1,N,15:SOUND2,N^2,13: 
S0UND3.N/4,11 :F0R T=1 TO D:NEXT T :GOTO 
1490 

1510 SOUND0:RESTORE 1520:RETURN 


1520 DATA 523,150,698,200,932,100,784, 
100,932,100,784,100,698,200,932,100,78 
4,200 

1530 DATA 932,100,698,100,784,100,932, 

100,784,200,932,100,698,300,1 

1540 SOUND1,880,15 

1550 FOR T=1 TO 50:NEXT T 

1560 SOUND0:RETURN 

1570 CLS :PRINT" ISTRU2I0N 

I Tornando a casa da una 

gita, la tua auto si e’ fermata in p 
anne. Sta calando la notte e 

decidi perciò’ di incamminarti alla r 
Icerca di un" 

1580 PRINT"aluto." 

1590 PRINT'TIentre stai per lasciare l’ 
auto tl accorgi di aver sbagliato s 
trada e di esserti immesso su una stra 
da Inter- rotta che ad un certo punto 
diventa un" 

1600 PRINT"semplice sentiero nel bosco 

1610 PRINT"Il bosco copre un’area di 5 
0 Kmq e nella tua macchina ci sono 
solo pochi oggetti." 

1620 GOSUB 1540:G0SUB 2010 
1630 CLS SPRINT”I pochi oggetti In tuo 
possesso sono: una torcia elettrica 
un cacciavite 
due corde 
una pistola 
tre proiettili" 

1640 PRINT"Decldl di addentrarti lo st 
esso nel bosco per vedere se ti ries 
ce di trovare almeno un rifugio p 

er la notte." 

1650 PRINT"Nel bosco, che hai scoperto 
e’ strega-to, puoi muoverti solo seco 

ndo 1 4 punti cardinali e la torcia 

col passare del tempo si scarlc 

a. " 

1660 GOSUB 1540 : GOSUB 2010 
1670 CLS:PRINT”Se al sorgere del sole 
sei ancora intrappolato nel bosco 

avrai la consolazione che la vlt 

a della torcia si allungherà’." 

1680 PRINT:PRINT"Non mi rimane che aug 
urare Buona Fortuna al vla9 

9 iatore coraggioso." 

1690 PRINT"Che la buona stella sia con 
TE 8" 

1700 GOSUB 1540 sGOSUB 2010 
1710 GOTO 180 

1720 FOR TL=1 TO 1000:NEXT TL :RETURN 
1730 CLS SCOLORI,15,(0,0)-C254,191),15 
1740 CIRCLEC60,100),25,4,2,0,1 
1750 CIRCLEC60,100),20,11,2,0,1,BF 
1760 LINEC70,55)-C100,70),4:LINE C70,1 
45)-C100,130),4 

1770 LINE (100,70)-(200,130),4,BF 
1780 CIRCLEC200,100),15,4,2,0,1,BF 
1790 PAINTC90,100),4:LINEC120,95)-t140 
,105),15,BF 

1800 COLORI,11:CURSOR30,10:PRINT"LA TU 
A TORCIA ELETTRICA SI E’ ROTTAS" 

1810 COLORII,1,C0,0)-C254,191),1 
1820 CURSOR30,10:PRINT"LA TUA TORCIA E 
LETTRICA SI E’ ROTTAS" 

1830 CIRCLEC60,100),20,1,2,0,1,BF 
1840 RETURN 

1850 PATTERNC#33,"3828282828382838":PA 
TTERNC#42,"003E2A7741772A3E":PATTERNC# 
48,"7EC3B9B5AD90C37E" :PATTERNC#49,"3C6 


4547/U477417F" :PATTERNC#50, "7EC3BDFDC3 
BF81FF" 

1860 PATTERNC#51,"7EC3BDF3F0BDC37E":PA 
TTERNCU52,"1C3464D4B781F710":PATTERNC# 
53,"FF81BFC3FDBDC37E":PATTERNC#54,"7EC 
2BE83BDBDC37E":PATTERNC#55,"FF81FD1B36 
2C2838" 

1870 PATTERNC#56,"7EC3B0C3BDBDC37E":PA 
TTERNC#57,"7EC3BDBDC17D437E”:PATTERNC# 
58,"0038283838283800":PATTERNC#59,"003 
8283828685870" :PATTERNCW60,"000E1A362C 
361A0E" 

1880 PATTERNC#61,"00007F417F417F00":PA 
fTERNC#62,"00382C361A362C38":PATTERNC# 
63,"7EC3BDFB161C141C" :PATTERNC#64,"7EC 
3B5ABA3BFC27E" :PATTERNC#65,"7E81BDBD81 
B0A5E7" 

1890 PATTERNC#66,"FE83BD83BDBD81 FÉ”:PA 
TTERNCH67,"FE83BDA7A7BDC37E":PATTERNC# 
68,"FC86BBA5A5BB86FC" :PATTERNC#69,"7EC 
3BD87BFB0C37E" :PATTERNC#70,"FF81BF82BE 
A0A0E0" 

1900 PATTERNC#71, "-7EC3BDBFB1BDC37E" :PA 
TTERNCU72,"E7A5BD81BDA5A5E7":PATTERNC# 
73,"7F4177141477417F":PATTERNC#74,"070 
505E5A5BDC37E":PATTERNC#75,"EEBAB68CB6 
BBADE7" 

1910 PATTERNC#76,"E0A0A0A0A0BF81FF":PA 
TTERNC#77,"E7BD99A5BDA5A5E7":PATTERNC# 
78,"É 7B59DADB5B9ADE7":PATTERNC#79,"7E8 
1BDA5A5BD817E" :PATTERNC#80,"FE83BDBD83 
BEA0E0" 

1920 PATTERNC#81,"7EC3BDBDADB5C37E":PA 
TTERNCU82,"FE83BDBD81BBADE7":PATTERNC# 
83,"7EC2BEC3FDBDC37E":PATTERNC#84,"FF8 
1EF2828282838":PATTERNC#85,"E7A5A5A5A5 
BD817E" 

1930 PATTERNC#86<"E7A5A5A5B0DB663C":PA 
TTERNC#87,"E7A5A5A5BDA5DB7E":PATTERNC# 
88,"E7BDDB6666DBBDE 7":PATTERNC#89,"C76 
DBBD66C282838":PATTERNC#90,"FF81FB366C 
DF81FF" 

1940 PATTERNC#47,"00070D1B366C5870":PA 
TTERNC#97,"000038063EC63E00":PATTERNC« 
98,"0060607C63637C00" :PATTERNC#99,"000 
01C6660661C00":PATTERNC«100,"0006063EC 
6C63E00" 

1950 PATTERNCH101,"000038C6F8C03C00":P 
ATTERNC#102,"000E303C30303000":PATTERN 
C#103,"00003EC6C63E060C" :PATTERNC#104, 
"00C0C0F8C6C6C600":PATTERNC«105,"00380 
03838383800" 

1960 PATTERNCU106,"000600060^666618":P 
ATTERNCH107,"0060667878646300":PATTERN 
C#108,”0030303030300E00":PATTERNC#109, 
"00007CD6D6D6C600”:PATTERNCH110,"00003 
86666666600" 

1970 PATTERNO#111,"000038C6C6C63800":P 
ATTERNC#!12,"0000F8C6C6F8C0C0":PATTERN 
C#113,"00003EC6C63E0607":PATTERNC#114, 
"00001E6060606000":PATTERNC#115,”00003 
CC03806F800” 

1980 PAT TERNO#116,"00307C3030301C00":P 
ATTERNC#117,"0000C6C6C6C63800":PATTERN 
C#118,"0000C6C66C6C3800":PATTERNC#119, 

"0000C6D6D6D67C00":PATTERNC#120, "0000C 
66C386CC600" 

1990 PATTERNC#121,"0000C6C6C67E0678":P 
ATTERNC#122,"00007E0C18307E00" 

2000 RETURN 

2010 CURS0R3,21:PRINT"Premi un tasto p 
er cont Inuare" 

2020 X#=INKEY#:IF X#="" THEN 2020 
2030 RETURN 
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SC 3000 

IL BOSCO MALEDETTO 


rie situazioni; ad esem¬ 
pio per un gioco che trat¬ 
ta un'avventura nel bosco 
di notte (il nostro caso), è 
bene usare il colore nero 
per lo sfondo ed. un altro 
colore chiaro per le scrit¬ 
te (giallo); in tal modo 
spesso si riesce a ricrea¬ 
re semplicemente attra¬ 
verso i colori l'atmosfera 
della situazione reale. 

Un particolare spesso tra¬ 
lasciato da molti creatori 
di programmi di tale ge¬ 
nere è che lo svolgimento 
del gioco avviene me¬ 
diante la tastiera tramite 
istruzioni INPUT o INKEY 
e che spesso la pressione 
involontaria di un tasto 
viene interprètata dal si¬ 


stema in modo diverso da 
come dovrebbe; per tale 
motivo è bene inserire 
delle routines di controllo 
degli INPUT per evitare 
che sul più bello, sfumi la 
possibilità di una vittoria 
per un tasto erroneamen¬ 
te premuto in luogo di un 
altro. 

Questo programma per il 
Sega SC 3000 occupa 
9600 bytes e la sua princi¬ 
pale caratteristica è l'es¬ 
sere concepito in modo 
tale da risultare diverso 
ogni volta che si gioca 
non posizionando gli 
ostacoli all’inizio del gio¬ 
co, ma man mano che si 
procede. 

Tutto il set di caratteri è 


stato ridefinito usando 
quello pubblicato nel nu¬ 
mero 6 di LIST, per il VIC 
20, e chiamato OUTLINE. 
Sono inoltre state create 
due routines sonore, una 
con musichetta sottolinea 
i momenti più importanti 
del gioco, l'altra viene at¬ 
tivata ogni qualvolta si ri¬ 
sponde ad una domanda 
del computer. 

Ultima caratteristica, non 
meno importante, è la pa¬ 
gina grafica che viene vi¬ 
sualizzata se il giocatore 
scampando ai pericoli del 
bosco, finisce con l'esau¬ 
rire la torcia elettrica di 
cui è in possesso. Tale 
eventualità si manifesta 
solo se la variabile S, cor¬ 


rispondente allo stato di 
carica della torcia, è mi¬ 
nore o uguale a 10 invece 
che pari al valore iniziale 
(75). 

Le situazioni a cui si va 
incontro nel corso del 
gioco sono cinque e sono 
cosi riassumibili: incontro 
con persone o animali pe¬ 
ricolosi, (l'uomo con l'a¬ 
scia e/o il serpente vele¬ 
noso); problemi legati al¬ 
la fame ed alla sete (caso 
del cestino con le provvi¬ 
ste e del laghetto); impre¬ 
visti (caduta in un fosso). 
Per ogni situazione che si 
presenta, la risoluzione 
può essere affidata alle 
proprie scelte oppure solo 
ed esclusivamente al caso. 


SEGA 563000 

IL CALCOLO DEI SOLIDI 

• Cubo • Parallelepipedo 

• Cilindro • Sfera eco., eco. 


GEOMETRIA-DIDATTICO 

di R. Perirò 



FACILE 


Tempo 

di esecuzione 

2 ORE 


iijpp ubblichiamo questo 
jjljijlji programma del lettore 
ÌI*lÌÌ!Ì; Romano Perino che, 
nonostante la semplicità, 
siamo sicuri riscuoterà un 
largo consenso grazie all’ar- 
gomento trattato. 

Il programma ci è stato in¬ 
viato privo di note di com¬ 
mento per cui ci vediamo co¬ 
stretti a commentarlo piutto¬ 
sto brevemente. 

La fascia di lettori che utiliz¬ 


za il computer SEGA ha 
un'età compresa, nella mag¬ 
gior parte dei casi, tra i 12 ed 
i 16 anni, per cui troveranno 
sicuramente utile usare e di¬ 
gitare questo programma 
che visualizza alcune figure 
di solidi ed esegue, parten¬ 
do da alcuni dati base, intro¬ 
dotti dall’utilizzatore, i cal¬ 
coli riguardanti: diagonali, 
superfici, volumi, raggi, ecc. 
Il programma è molto sem¬ 


plice; partendo da una prima 
schermata di presentazione 
offre l'elenco dei solidi di cui 
si possono visualizzare le fi¬ 
gure ed eseguirne i calcoli. 

1) Cubo 

2) Parallelepipedo rettango¬ 
lo 

3) Cilindro circolare retto 

4) Prisma retto 

5) Piramide regolare 

6) Cono retto 


7) Sfera. 

In base all'istruzione ON- 
...GOSUB il programma pro¬ 
segue eseguendo la routine 
del solido richiesto; alla fine 
della visualizzazione e del¬ 
l'esecuzione dei calcoli re¬ 
lativi alla figura, la routine 
di linea 2050-2090 provvede 
a inserire un ritardo finché 
non si preme un tasto. 


100 

REM 

XXX 

Tank Software 1984 

XXX 

110 

REFI 

XXX 

present 

XXX 

120 

REFI 

XXX 


XXX 

130 

REN 

XXX 

figure solide 

XXX 

140 

REFI 

XXX 

geometria I 

XXX 


150 REFI xxxxXXXXXxxxXXxxXXXAXXXXXXxXXX 

160 REd X Tank Software 1985 
170 REFI X ui a Geronl n 2 * 24025 


180 REH x Gazzaniga [Bergamo.! 

190 REFI X 

200 REFI XXXXXXXXXXXxXXXXXxXXXXXXXXXXXX 

210 SCREEN 2,2:CLS 

220 LINE t150,705-1150.160),1 

230 LINE (200,705-C200,1605 

240 CIRCLE C175,1605,25,1,.50,0,.50 

250 CIRCLE 1175,655,27,1,.50,0,1 


260 LINE C148,655-(148,755 
270 LINE C202.655-C202.755 
280 CIRCLE C175,755,27, 1,.50,0, .50 
290 CIRCLE C175.655.5,1,.90,.50,1 
300 CIRCLE [175,645,8,1,.99,.50,1 
310 LINE (160,905-C160,1505 
320 LINE (170,935-C170,1535 
330 LINE C180,935-C180,153) 

340 LINE C190,905-(190,1505 
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350 CURSOR 18,30:PRINT CHR«C17) ; "Tank 

Software" 

360 CURSOR 30,60:PRINT "present " 

370 CURSOR 33,130:PRINT CHR*CI6);"GEOM 
STRIA I” 

380 GOSUB 2050 

390 REO ***************************** 
400 REfl *** GEOMETRIA I figure solide 
410 REM ***************************** 


420 RFM 


430 SCREEN 1,1sCLS 


440 PRINT 

«- 




in memor 



460 PRINT "- 







.. VI " 

480 PRINT 
...2" 



"Paral lelepI pedo rettangolo. 

490 PRINT 

"Cl l Indro c irco lare 

retto... 

.. .3" 

500 PRINT 

... 4" 

"PrIsma retto. 


510 PRINT 

"Piramide regolare., 


.. .5" 

520 PRINT 





530 PRINT 



.. .7" 

540 PRINT 

550 PRINT 

CHR*(10);"A) Fine' 




560 PRINT 

" Che cosa scegli 

? " 

570 REM 

*** SCELTA *** 


580 GOSUB 

2060 :SC=ASC(B*3 



600 SC=SC-48 

610 IF SC<1 OR SC>10 THEN 580 

620 ON SC GOSUB 650,830,1050,1240,1480 

,1730,1910 
630 GOTO 430 

640 REM ***************************** 

650 REM *** SOLIDO No 1 *** 

660 CLS 

670 GOSUB 2110 

680 INPUT " Lato=";A 

690 SCREEN 2,2:CLS 

700 LINE (90,60)-(30,120),1,B 

710 LINE (110,903-190,120) 

720 LINE (110,30 3- 00,60) 

730 LINE (30,60)-(60,30) 

740 LINE (60,90)-(30,120) 

750 LINE (60,30)-(110,90),,B 

760 CURSOR 130,35 :PRI NT 'Volume =";A*A 

*A 

770 CURSOR 130,45:PRINT "sup. totale = " 

!6*A*A 

780 CURSOR 130,55 :PRINT "suf . latera le 
»" ;4*A*A 

790 CURSOR 130,65 SPRINT "sup. base (2) 

*" ;2*A*A 

800 GOSUB 2050 

810 GOTO 430 

820 REM *** SOLIDO No 2 *** 

830 CLS 

840 GOSUB 2110 

850 INPUT "Spigolo a -"JA 

860 INPUT "Spigolo b »"iB 

870 INPUT "Spigolo c -";C 

880 SCREEN 2,2 :CLS 

890 LINE (50,403-00, 120), l.B 

900 LINE (90,120)-(100,100) 

910 LINE (60,100)-(50,120) 


920 LINE (60,20)-(50,40J 
930 LINE (100,203-00,40) 

940 LINE (60,20)-(100,100),,B 
950 LINE (90,40)-(60,1003,6 
960 COLOR 1,15 

970 CURSOR 130,35:PRINT 'Volume =";A*B 

*C 

980 CURSOR 130,45 SPRINT "sup.totale = " 
j2*(A+B+BeC*A+C) 

990 CURSOR 130,55:PRINT "sup . latera le 
»";(A*B)*2r(A*C)*2 

1000 CURSOR 130,65:PRINT "sup. base (2) 

*" ;a*c*2 

1010 CURSOR 130,75:PRINT "diagonale = " 
5lNTCSQR(A*AtB*BrC*0) 

1020 GOSUB 2050 
1030 GOTO 430 

1040 REM *** SOLIDO No 3 *** 

1050 CLS 

1060 GOSUB 2110 

1070 INPUT "Raggio = " ;R 

1080 INPUT "Altezza = ";H 

1090 SCREEN 2,2:CLS 

1100 CIRCLE (50,303,25,1,.25,0,1 

1110 LINE (25,30)-(25,130) 

1120 LINE (75,30)-(75,130) 

1130 CIRCLE (50,1303,25,1,.25,0,1 
1140 LINE (50,130)-(75,1303,6 
1150 LINE (50,30)-(50,130) 

1160 COLOR 1,15 

1170 CURSOR 130,35SPRINT 'Vo lume = " ;H* 
R*R;"_" 

1180 CURSOR 130,45SPRINT "sup. totale = 
";2*R*H+2*R*R ; 

1190 CURSOR 130,55:PRINT "sup . Iatera le 

=■" ;2*r*h;"_" 

1200 CURSOR 130,65 SPRINT "sup. base (2) 
=";R*R*2 
1210 GOSUB 2050 
1220 GOTO 430 

1230 REM *** SOLIDO No 4 *** 

1240 CLS 

1250 GOSUB 2110 

1260 INPUT "Altezza = ";H 

1270 INPUT "Lato =";L 

1280 SCREEN 2,2:CLS 

1290 LINE(50,803-00, 160), 1,B 

1300 LINE (30,503-00, 140) 

1310 LINE (30,140)-(50,160) 

1320 LINE (30,503-(50,80) 

1330 LINE (90,160)-(110,140) 

1340 LINE (110,140)-(110,501 
1350 LINE (110,503-00,80) 

1360 LINE (30,140)-(55,120) 

1370 LINE (55,403-05, 120), ,B 
1380 LINE (85, 120)-( 110, 140.) 

1390 LINE (55,403-00,50) 

1400 LINE (85,40)-(110,50) 

1410 CURSOR 115,35SPRINT "volume «";2. 
598*L*L 

1420 CURSOR 115,45:PRINT "sup. totale = 
" ;L*6*H+2.598*L*L 

1430 CURSOR 115,55 SPRINT "sup . I atera le 

■" ;l*6*h 

1440 CURSOR 115,65:PRINT "sup. base (2) 
= " ;2.589*L*L*2 
1450 GOSUB 2050 
1460 GOTO 430 

1470 REM *** SOLIDO No 5 *** 

1480 CLS 

1490 GOSUB 2110 

1500 INPUT "Lato base ="JL 

1510 INPUT "Altezza ="JH 

1520 INPUT "Apotema laterale =";A 

1530 SCREEN 2,2:CLS 


1540 LINE (30, 1203-00, 120), 1 
1550 LINE (60,303-00,120) 

1560 LINE (60,303-00,120) 

1570 LINE (90,120)-(100,90) 

1580 LINE (60,30)-(100,90) 

1590 LINE (30, 1203-00,90) 

1600 LINE (100,90)-(50,90) 

1610 LINE (50,903-(60,30) 

1620 LINE (60,303-05, 100),6 
1630 LINE (60,30)-(60,100) 

1640 LINE (60,1003-05,100) 

1650 COLOR 1,15 

1660 CURSOR 130,35 sPRINT "volume =";L* 
L*HO 

1670 CURSOR 130,45:PRINT "sup. totale = 
";l*4*A'2*l*l 

1680 CURSOR 130,55SPRINT "sup. laterale 
= " ;L*4*A/'2 

1690 CURSOR 130,65:PRINT "sup.iase ="; 
L*L 

1700 GOSUB 2050 
1710 GOTO 430 

1720 REM *** SOLIDO No 6 *** 

1730 CLS 

1740 GOSUB 2110 

1750 INPUT "Raggio =";R 

1760 INPUT "Altezza ■" JH 

1770 SCREEN 2,2:CLS 

1780 CIRCLE (60,120),30,1,.25,0,1 

1790 LINE (60,303-00,120) 

1800 LINE (60,303-00,120) 

1810 LINE (60,30)-(60,1203,6 
1820 LINE (60,1203-00,120) 

1830 COLOR 1,15 

1840 CURSOR 130,35 SPRINT "volume =";R* 
R*H/'3;"_" 

1850 CURSOR 130,45 SPRINT "sup. totale = 

";lNT(R*RrSQR(R*R+H*H)3 

1860 CURSOR 130,55:PRINT "suo. laterale 

*"5INT(R*SQR(R*R+H*H)) 

1870 CURSOR 130,65:PRINT "sup. base ="; 
R*R J "_" 

1880 GOSUB 2050 
1890 GOTO 430 

1900 REM *** SOLIDO No 7 *** 

1910 CLS 

1920 GOSUB 2110 

1930 INPUT "Raggio = " ;R 

1940 SCREEN 2,2:CLS 

1950 FOR 1=1 TO 35 STEP 1 

1960 CIRCLE (65,653,1,14,1,0,1 

1970 NEXT I 

1980 LINE (65,65)-(100,653,6 
1990 COLOR 1,15 

2000 CURSOR 130,35 SPRINT "volume ="54' 
3*R*R*R; 

2010 CURSOR 130,45 sPRINI "sup.totale = 
" ;4*R*R ; 

2020 GOSUB 2050 

2030 GOTO 430 

2040 REM *** INKET* *** 

2050 CURSOR 15,180 SPRINT CHR*(16)i"Pre 
me»-e un tasto" 

2060 BEEP 

2070 B*=INKEYS 

2080 IF B*="" THEN 2070 

2090 RETURN 

2100 REM **************************** 
2110 PRINT "- 


2120 CURSOR 13,1 SPRINT 
2130 PRINT "- 


'Misure 1 


2140 RETURN 

2150 REM *** FINE PROGRAMMA *** 

2160 REM * memoria occupata s5427 
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SHARP ” 700 



DIFFICILE 


Tempo 
di esecuzione 

4 ORE 


ELENCO FORNITORI 


Utile alle piccole aziende 

Come programmare un elenco fornitori 


olti proprietari di pic¬ 
cole aziende si trova- 

-.no costantemente in 

difficoltà per i problemi con¬ 
nessi alla contabilità. In par¬ 
ticolare, all’approssimarsi 
della scadenza per la pre¬ 
sentazione della dichiarazio¬ 
ne I.V.A., è necessario pro¬ 
cedere alla compilazione 
dell'elenco clienti e fornitori, 
con il lungo e noioso lavoro 
di copiatura dei dati anagra¬ 
fici e di esecuzione delle 
somme dei vari importi con 
la relativa necessaria qua¬ 
dratura che, purtroppo, non 
sempre riesce al «primo col¬ 
po». Il programma che pre¬ 
sentiamo vi consentirà, con 
una immissione dati diluita 
nell'arco dell'anno, di tenere 
costantemente aggiornato il 
vostro archivio, di avere 
sempre disponibili utili dati 
sui vostri fornitori e, soprat¬ 
tutto, di ottenere, alla fine 
dell'anno, la stampa comple¬ 
ta dell'elenco fornitori con 
tutti i dati anagrafici ed im¬ 
porti arrotondati richiesti. 

Il programma permette di 
gestire ben 179 fornitori: es¬ 
so è stato collaudato in prati¬ 
ca per una società che ave¬ 
va, alla fine del 1984, circa 
170 fornitori diversi, con un 
totale di oltre 700 fatture, no¬ 
te di credito e bollette doga¬ 
nali, per un importo com¬ 
plessivo di oltre 600 milioni; 
comunque, mentre il numero 
massimo di fornitori è limita¬ 
to a 179, il numero totale di 
fatture inseribili non ha prati¬ 
camente limiti. 

ISTRUZIONI PER L’USO DEL 
PROGRAMMA 

Prima di poter utilizzare il 
programma, occorre proce¬ 
dere alla sua «inizializzazio- 
ne»; dopo aver trascritto il li¬ 
stato ed eseguito un accura¬ 
to controllo della copiatura, 
inserite nel registratore una 
cassetta vergine e battete il 
comando «RUN 1000» segui¬ 
to da «CR». Il computer chie¬ 
de l'immissione dei dati ana¬ 


grafici della vostra Ditta (ra¬ 
gione sociale, indirizzo, co¬ 
dici attività, ecc.) nonché 
l'anno cui si riferisce la con¬ 
tabilità: quest’ultimo è im¬ 
portante poiché, come è no¬ 
to, nell'elenco fornitori le fat¬ 
ture emesse durante l’anno 
corrente vanno separate da 
quelle emesse l'anno prece¬ 
dente: a tale separazione 
provvede automaticamente 
il programma in base ai dati 
da voi forniti. Al termine del¬ 
l'immissione e conferma dei 
dati anagrafici appare il 
«menù» ed il computer è 
pronto a ricevere i dati. 

Prima di esaminare le singo¬ 
le opzioni del «menù» (Fig. 
1), occorre spiegare le mo¬ 
dalità di registrazione dei 
dati al temine di una seduta 
di lavoro e il caricamento di 
programma e dati all'inizio 
di un'altra. 

— Registrazione dati: 

al termine di ogni serie di 
immissioni, i dati devono es¬ 
sere registrati su cassetta: 
per semplificare le operazio¬ 
ni, ogni volta viene di nuovo 
registrato anche il program¬ 
ma e, immediatamente di se¬ 
guito. il «file» di dati. Pertan¬ 
to, una volta scelta l'opzione 
8, riavvolgete interamente il 
nastro e seguite le istruzioni 
sul video; un segnale acusti¬ 
co indica il termine della re¬ 
gistrazione. 

— Caricamento del pro¬ 
gramma: 

analogamente a quanto so¬ 
pra descritto, al caricamento 
del programma nel compu¬ 
ter segue la lettura del «file» 
di dati; anche tale operazio¬ 
ne è automatica purché, all’i¬ 
nizio del caricamento, si im¬ 
posti il comando «LOA- 
D:RUN» invece del semplice 
«LOAD» (vedi articolo a pag. 
26 del n° 2 di febbraio 1985 di 
«LIST»). 

Esaminiamo ora le singole 
opzioni del menù. 

1 - IMMISSIONE ANAGRAFI¬ 
CO FORNITORI 

Ad ogni fornitore inserito 


viene assegnato automatica- 
mente un codice progressi¬ 
vo; per qualunque operazio¬ 
ne successiva il computer ri¬ 
chiede tale codice: vi consi¬ 
gliamo, pertanto, di tenere 
una rubrica in cui annoterete 
il nome di ogni nuovo fornito¬ 
re ed il relativo codice asse¬ 
gnato dal computer. Inserite 

1 dati anagrafici, quindi ese¬ 
guite il controllo: se i dati so¬ 
no esatti premete «CR». Se. 
invece, dovete eseguire cor¬ 
rezioni, premete il tasto «C»: 
il cursore si posiziona all'ini¬ 
zio della prima stringa (ra¬ 
gione sociale). Per correg¬ 
gere l’errore non è necessa¬ 
rio riscrivere per intero la 
stringa anzi, se la correzione 
deve essere eseguita in una 
delle ultime righe, è suffi¬ 
ciente premere «CR» alcune 
volte fino a posizionarsi sul¬ 
la stringa da correggere. Ri¬ 
cordate di inserire la lettera 
«P» se il fornitore è una per¬ 
sona fisica o la lettera «S» se 
trattasi invece di società: 
questo dato deve comparire 
nell'elenco fornitori e verrà 
riportato nella stampa finale. 
In ogni caso, se qualche dato 
anagrafico è mancante o in¬ 
certo, inserite un trattino nel¬ 
la stringa apposita: potrete 
completarla in un secondo 
momento usando la prossi¬ 
ma opzione. 

2 - CORREZIONE ANAGRA¬ 
FICO FORNITORI 

Potete utilizzare tale opzione 
per correggere o aggiungere 
dati ad un fornitore prece¬ 
dentemente immesso; inse¬ 
rite il codice del fornitore cui 
apportare la modifica: ven¬ 
gono visualizzati i dati pre¬ 
cedentemente memorizzati 
e su di essi potete operare le 
correzioni agendo in modo 
analogo a quanto descritto 
nella fase di correzione del¬ 
l'opzione 1. 

3 - IMMISSIONE FATTURE 

Il programma richiede l'im¬ 
missione del codice del for¬ 


nitore che ha emesso la fat¬ 
tura; compare il numero pro¬ 
gressivo di registrazione 
(controllate che coincida con 
quello riportato nel registro 
IVA) e i dati anagrafici del 
fornitore chiamato; viene ri¬ 
chiesto l'inserimento del¬ 
l'anno di emissione della fat¬ 
tura. Immettete quindi, nel¬ 
l'ordine. gli importi indicati 
nella fattura: totale, imponi¬ 
bile, aliquota IVA, importi 
non imponibili o esenti (bolli, 
spese tratte, affitti, interessi 
di mora, ecc.) e acquisti non 
imponibili ai sensi dell'art. 8 

— secondo comma; se alcu¬ 
ni importi non sono presenti 
nella fattura, inserite uno ze¬ 
ro. Inserito l'ultimo importo, 
non appena quest'ultimo è 
stato immesso, sulla destra 
del video compaiono i con¬ 
teggi effettuati dal computer 
in base ai dati immessi: se il 
totale calcolato coincide con 
il totale inserito, un breve 
suono acuto segnala che si 
può eseguire la conferma 
premendo «CR»; se ciò non 
si verifica, il computer emet¬ 
te un suono più lungo e gra¬ 
ve, viene visualizzata la dif¬ 
ferenza fra i due totali e, co¬ 
munque, non è possibile 
operare la conferma. 

In questo caso occorre usare 
una delle seguenti possibili¬ 
tà di scelta: 

— Correzione (C): premendo 
questo tasto l’immissione 
viene annullata e il compu¬ 
ter si predispone a ricevere 
di nuovo i dati a partire dal¬ 
l’anno di emissione della fat¬ 
tura. 

— Aggiunta importi (A): que¬ 
sta opzione permette di ag¬ 
giungere importi a quelli 
precedentemente immessi: 
pertanto quelli già inseriti 
non devono essere ripetuti. 
L’opzione è indispensabile 
per immettere fatture in cui 
siano presenti più di un im¬ 
ponibile e più di una aliquota 
IVA: in tal caso con la prima 
immissione occorre inserire 
il totale fattura, uno da gli im¬ 
ponibili con relativa aliquota 
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ed eventuali importi non im¬ 
ponibili o esenti; si verifica 
naturalmente uno sbilancio: 
a questo punto si preme la 
lettera «A», si immette uno 
zero nel «totale fattura» (gli 
importi vengono infatti ag¬ 
giunti e non sostituiti) quindi 
si inserisce un altro imponi¬ 
bile con la relativa aliquota 
IVA. Si procede cosi fino ad 
esaurimento degli importi ri¬ 
portati in fattura: quando il 
totale calcolato coincide con 
quello precedentemente im¬ 
messo (suono acuto) si può 
procedere alla conferma con 
il tasto «CR>». 

— Immissione diretta (D): è 
utile, ad esempio, quando in 
una fattura l’IVA sia stata 


CONTABILITÀ-APPLICATIVO 

di E. Fabrizi 


calcolata o scorporata in 
modo errato: usando tale 
opzione il computer non 
esegue più il calcolo dell’l- 
VA in base all'aliquota inse¬ 
rita, ma si limita a sommare 
gli importi immessi: ciò per¬ 
mette, in ultima analisi, di 
poter inserire anche un im¬ 
porto di IVA errato. 

Per quanto concerne le note 
di credito, tutti gli importi 
vanno immessi premettendo 
il segno «—», ad esclusione 
dell'aliquota IVA che deve 
essere, ovviamente, positi¬ 
va. 

— Bollette doganali: l’im¬ 
missione delle bollette do¬ 
ganali (per le quali non inte¬ 
ressa il relativo fornitore 


estero) si opera inserendo il 
codice 180; le modalità di 
immissione degli importi so¬ 
no analoghe a quelle del¬ 
l'immissione diretta. 

4 — CANCELLAZIONE FAT¬ 
TURE 

Questa opzione permette di 
cancellare tutte le fatture re¬ 
lative ad un qualsiasi forni¬ 
tore: gli importi vengono az¬ 
zerati, mentre al numero 
complessivo di registrazioni 
viene sottratto un numero 
pari a quello delle fatture 
cancellate. Il fornitore, co¬ 
munque, non viene cancella¬ 
to dall’anagrafico; il suo no¬ 
minativo può essere sostitui¬ 
to usando l’opzione «corre¬ 




zione anagrafico». 


5 —ELENCO SU VIDEO 

Inserendone il codice, è pos¬ 
sibile visualizzare il totale 
delle fatture emesse da un 
fornitore, suddivise per anno 
di emissione 


6 — ELENCO SU STAMPAN¬ 
TE 

Questa opzione permette di 
stampare su carta i totali de¬ 
scritti al paragrafo prece¬ 
dente: le somme risultano 
arrotondate alle mille lire. 
Per ottenere la stampa com¬ 
pleta di fine anno, occorre 
eseguirla da Cod. 1 a Cod. 
180: in questo caso vengono 
stampati all’inizio dell'elen- 


>0 REH* ELENCO FORNITORI * 

20 REtl* BT E.FABRIZI-1984 * 

30 J?EH* SHARP HZ-700 * 

40 COLOR, ,7,0:GOSUB2100:GOSUB2030:GOSUB2 
040.-CURSOR0, 1 7 SPRINT"LETTURA DATI " :G0SUB 

21 10:PRINT"BPremere <ST0P> e <CR> " :G0SU 
B2140 

50 ONERRORGOTO3000 CONSOLE:PRINT"H" :PRIN 
TTABC18)"nENU":PRINT"HB1 inniSSIONE ANAG 
RAF ICO FORNITORI":PRINT"B2 CORREZIONE AN 
AGRAFICO FORNITORI":PRINT"B3 iriniSSIONE 
FATTURE":PRINT"B4 CANCELLAZIONE FATTURE" 
60 PkiNl"U5 ELENCO SU UIDE0":PRINT"B6 EL 
ENCO SU STAITPANTE" :PRINT"B7 RISCONTRO"=P 
RINT"E8 REGISTRAZIONE DATI" 

70 GETZ : IF CZ=03+CZ>83THEN70 

80 PRINT"B":ONZGOTO90,160,210,460,570,76 

0,940,990 

90 F0RK = 1 T0179:IFDT*CK3=""THEN1 10 

108 NEXT:PRINT"CqpqcI u' massima ra99iun 

ta" :FORK = 1TO1000:NEXT:GOTO50 

110 PRINTTABC43"imiSSIONE ANAGRAFICO F0 

RNITORI":PRINT"BBCodI ce : "!K \ :GOSUB2180 

120 GOSUB2200:G0SUB2180:G0SUB2160 

130 GETZ*:IFZ*=CHR*C133THENGOSUB2000:G0T 

050 

140 IFZ*="C"THEN120 
150 GOTO 130 

160 PRINT T AB C 4 3"CORREZIONE ANAGRAFICO FO 

RNI TORI " :PRlNT"WBlns er Ire II codice forn 

il ore: : INPUTK :GOSUB21 80 

170 GOSUB2200:G0SUB2180 :G0SUB2160 

180 GETZ*:IFZ*=CHR*C133THENGOSUB2000 :G0T 

050 

130 IFZ*="C"THEN170 
200 GOT0180 

210 PRINTTAB( 1 1 )" IflM 1 SSIONE FATTURE" :PRI 
NT"BInserlre il codice fornitore: ";:INP 
UTK : IFK m 180THEN400 
220 GOSUB2250:G0SUB2210 
230 PRINT"BAnno reg I sir. C " lUSING”**##»" ;A 
P 5 :PRINT"-"5USING" **#(*#" ;AC; SPRINT"3" ; : IN 
PUTX :PRlNT"BTot.fattura:":PRlNT"BImponlb 
ile:" :PRINT"fflAI iq. IVA:":PRlNT"BImp.N.I. 
-Es. :" :PRINT"BImp. art.8 : " 

240 PRINT"fflPer confermare <CR>":PRINT"Pe 
r correggere <C>":PRlNT"Per aggiungere i 
mporti <A>" :PRINT"Immi ss Ione diretta <D> 
"J :FORJ=1TO5:ZCJ5=0:NEXT 
250 IFCXOAC3*(X<>AP3THENCURSOR0, 10:FORJ 
= 1TO20:PRINTTABC 321"BErrore":GOSUB2000:P 
RINTTABC32]"ffl ":GOSUB2000:NEXT :G0T 

0220 


260 C0NS0LE9,12,13,11:PRINT"B":F0RJ=1T05 

:PRINT:INPUTXCJ3: NEXTsCONSOLE 

270 XC33=XC23*XC33^100:IFCXC33-INTCXC333 

>03*CXC23>03THENXC33=INTCXC333*1 

280 IFXC25 <0THENXC 33 = INTCXC333 

290 F0Rj = 1T05:YCJ3=YCJ3+XCJ3:NEXT :F0RJ=2 

T05 :ZCJ 5=T C J 3:NEXT:ZC 1 3=0 :F0RJ=2TO5:ZC1 5 

=EC13+ZCJ3 :NEXT:C0NS0LE1 1 , 1 1,28, 1 1 SPRINT 

"E" :F0RJ = 1T05:PRINTUSING"##,##K, ###";ZCJ 

5 SPRINT sNEXT:C0NS0LE 

308 IFZC13<>YC1 3THENGOSUB2020 SCURS0R8,20 
SPRINT" ":PRINT"BDif 

f.";zcu-rtn 

310 IFZC n=TC 13THENCURSOR0,20 SPRINT" 

":GOSUB2000 

320 GETZ*:IF(Z*=CHR*C133 3*CZC13-YC133THE 
NGOSUB2000:GOSUB2250:GOTO380 
330 IFZ*="C"THENGOSUB2250 :CURSOR0,8 :GOTO 
230 

340 IFZ*="A"THEN260 

350 IFZ*="D"THENGOSUB2250:CURSOR0,15:PRI 
NT"I.U.A. : ":CONSOLE9,12,13, 11 :PRINT"B 

":F0RJ = 1T05:ZCJ 3=0 SPRINT :INPUTXCJ 3 :NEXT : 
CONSOLE:GOTO290 
360 IF2*='V"THEN50 
370 GOTO320 

380 IFX=APTHENN0CK3=N0CK3M :A0CK3=A0CK3+ 
ZC23 :B0CK3=B0(K 3ZC33 :C0CK3=C0CK 3+ZC4 3 :D 
0CK3=D0CK3+ZC53:RG=RG»1 SGOTO50 
390 IFX-ACTHENN1(K3-N1CK3 + 1 :A1CK3-A1CK3 + 
2(23:B1CK3=B1CK3 + ZC3)SCICK3*C1CK3+ZC4 3 :□ 

1CK3=D1CK3+ZC53:RG=RG+1 :GOTO50 
400 PRINT"B":PRlNTTABC23"inniSS.BOLL.DOG 
ANALI-REGISTR.N.";RG*1 SPRINT"BBBBUaI ore 
imponibile: "; :INPUTX1 :PRINT"BIUA a 

ddebI tata : ";:INPUTX2 

410 CONSOLE5,20:PRINT"B":PRINT"Totale bo 
Metta: " ;USING"HB, «#«, «Hit" ;X1+X2:P 

RlNT"BUalore imponibile: " ;USING"#I», M 

##, »•»«*" 5X1 :PRINT"B1.U.A. : 

" ;USING"IM», UFF, ««#" 5X2 :CONSOLE SGOSUB2000 
SGOSUB2160 

420 GETZ* : IF2*=CHR*C13 3 THENBD=BD+1:BI=BI 

♦XI:BU=BU+X2:RG=RG+1:GOTO50 

430 IFZ*="C"THEN400 

440 I FZ*=" THEN50 

450 GOTO420 

460 PRINTTABC93"CANCELLAZIONE FATTURE": 

PRINT"BInserire il codice forn ì t ore : " ; : 

INPUTK : IFK=180THENS*0 

470 G0SUB2180 :G0SUB2170 

480 GETZ*:IFZ*=CHR*(133THEN510 


430 I FZ*="THEN50 
500 G0T0488 

510 RG=RG-N0C K 3-N1C K 3:N0CK3=0=N1CK3=0=A0 
CK3=0:A1CK3=0:B0CK3=0=B1CK3=0:C0CK3=0:C1 
CK3=0:D0CK3=0SD1CK3=0:GOTO58 
520 PRINT"ECANCELLAZIONE BOLLETTE DOGANA 
LI"SGOSUB2170 

530 GETZ*:IFZ*=CHR*C133THEN560 
540 IFZ* = 'V"THEN50 
550 GOTO530 

560 RG=RG-BD:BO=0 =BI=8:BU=0:GOTO50 
570 PRINTTABC93"ELENCO F0RNIT0RI-UIDE0": 
PRINT"BBInserire il codice fornitore: 
:INPUTK : IFK=180THEN710 
580 FORK=KTO179 :1 FOT* C K 3 = ""THEN700 
590 PRINT-B" --PRINTTABC 1 03"BFORNITORE Cod 
.N." ;K :GOSUB2220:PRINTTAB(213"B"!AP;TABC 
34 3AC 

600 PRINT"BN. Fatture iTABC 1 93USING"*»##, 
t**M*" ÌN0CK3 ! :PRINTTABC323USING"#tt#, #****" ;N 
UK3:PRINT"Blmponlbi I e :" :PRINT"BI.U.A.:" 
:PRINT"BImp.N.I.-Es.SPRINT"BImp. ART.8 

:" :PRINTTABC 153"- - 

"SPRINT"Tota I e:" 

610 IFCA0CK3^B0CK3»C0CK3♦DBCK3>999999993 
♦CAICK3+B1CK3+C1CK3+D1(K3>999999993THEN6 
40 

620 CURSOR0, 1 3 :PR INTTABC 1 63USING" **# , **#**, 
###" JA0CK3 ;:PRINTTABC293USING"##,«I»»,IMM» 
“ ; A1 CK3 :PR INTTABC 1 63 "B" JUSING"**#, *MM*, ***** 
" 5B0CK3 1 sPRINTTABC293USING"##, ttftt», !**»**" ;B 
1CK 3 sPRINTTABC163"B"JUSING"****, ******, »****»" iC 
0CK3 ! :PRINTTABC293USING"*»**, *****»,***»*»" ;CI CK 

3 

630 PRINTTABC163"B"JUSING"****,******, *»*»**"100 
CK J ; :PRINTTABC293USING"**I*, «****», ******" ;D1 CK 3 
:PRINTTABC163"B"JUSING"I***, ******, ******"iA0CK3 
♦B0CK3+C0CK3+D0CK35:PRINTTABC293USING"lM* 
,*MMt, tt(Mt" ; Al CK3+B1 CK3+C1 CK3+D1 CK 3 SGOT066 
0 

640 CURSOR0,13:PRINTTABC163A0CK3;TABC293 
AlCK3 sPRINTTABC163"B"JB0CK3 ITABC293B1CK3 
SPRINTTABC163"B";C0CK3 JTABC 293C1 CK3=PRIN 
TTABC163"B"JD0CK3 JTABC293D1 CK3 
650 PRINTTABC163 "B” JA0CK3+B0CK3+C0CK3+D0 
CK3 JTABC293A1CK3+B1CK3♦C1CK3+D1CK3 
660 PRINT"BProssImo fornitore <CR>" 

670 GETZ*:IFZ*=CHR*C133THEN700 
6B0 IFZ*='V"THEN50 
690 GOTO670 
700 NEXTK 

710 PRINT'B"sPRINTTABC113"BOLLETTE D0GAN 
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ALI " :pRINT"BBHBNum. boi lette: ";TPBC233US 
ING"*MM», IMM*" ;8D :PRINT"BUa I ore Impon ib i I e 

!" :PRINT"BI.U.P. :PRINTTPBC193"- 

-" :PRINT"Totale 

720 IFBI+BU>99999999THEN740 
730 CURSOR201 8 SPRINTUSING"#**, MM*, Ut»#" ;BI 
sPRlNTTPBC 203"B" ;USING"I*I*, IMM», *MMT ;BU:PR 
INTTPBC203 "B" lUSING"## , #****, (MM» M ;BI+BU :'GO 
TO750 

740 CURSOR20I 8:PRINTBI :PRINTTPBC203"B" ;B 
U :PRINTTPBC203''B" iBI+BU 
750 CURSOR0I 23 :PR I NT "Preme re <CR>*':GOSUB 
2140:GOTO50 

760 GOSUB2030:PRINT"fflBStQmpa elenco da C 
od.N. : " ; :INPUTX:PRINTTPBC153"Ha Cod.N. : 

" i : INPUTT : IF CX =1 3*CY=1803THENGOSUB2260 
770 nODETS:PRlNT/PTPBC43"Pnno" ;TPBC103"N 
.fati.";TPBC223"Imponibile"ÌTPBC383"I.U. 
P. " ;TPBC483"N.I.-Es.";TPBC593"Pcq.art.8" 
JTPBC74 3 "Tota I e " SPRINT'P 
780 PPGE4:FORJ-0TO5:?CJ 3=0=NEXT:FORK=XTO 
T 

790 IFK=180THEN910 
800 IFDT*CK3=""THEN900 

B10 PRINT/PUSING"###";K ; :PRINT-'PTPBC43DT 
SCIO JTPBC283INSCIO 5TBBC523CMSCK3ÌTPBC773 
PUSCK3:PRINT/PTPBC43"Partita IUp: "5P1SC 
K3 ! :IFRS*CK3 = "P"THENPRINT/-P" * CPers.fi 
sica3" 

820 IFRS* CK3”"S"THENPRI NT«'P" Società'" 

830 IFCRSSCK3 <>"P"3*CRS*CK3 O"S”3THENPRI 
NT-'P" " 5RSSCK3 
840 GOSUB2300 

850 PRINT-'PTPBC43PC;TPBC103USlNG"tMM*, #**# 
" 5N1 CK3 ; :PRINT/'PTPBC21 3USING''#****, *•##” ;TC 
1 3 ; :PRINT/'P" , 000" ;TPBC 333USING"*NMI, WMt " ; 
YC23 ; :PRINT/-P" , 000" ;TPBC453USING"*MM* J t*#t* 
";YC33i :PRINT'P",000" ;TPBC573USING"IMMt, t* 
IMI";YC43 ! 

860 PRINT/P",000" STPBC693USING"#|M*, IMM*" ; 
YC13+YC23+YC3 3+YC4 3 ;:PRINT/P",000" 

870 PR INT/'PTPBC 4 3PP jTPBC 1 03USING" IMM*, *»* 
"5N0CK3 ; :PRINT/-PTPBC21 3USING"t*tMI, #!*#" ;XC 
1 3 ; :PRINT/P" ■ 000" ;TPBC333USING"*MH», tM*tt " ; 
XC23 ; JPRINT-'P" i 000" ; TPBC 453USING" IMM*, IMM* 
" 1XC33 S :PRINT/'P" , 000" ;TPBC57 3USING"l***tl, # 
##"JXC43 ; 

880 PRINT/P" i 000" ;TPBC693USlNG"**l**t, #****" ; 
XC13+XC23+XC33+XC43;iPRINT-'P”,000" 

890 F0RJ=1T04:2CJ3=2CJ3+XCJ3+YCJ3:NEXTJ : 

2C03=2C03+N0CK3+N1CK3: IFK/21-INTCI02I3=0 

THENGOSUB2280 

900 NEXTK:IFY<>180THEN50 

910 PRINT'P :PRINT/'PTPBC 31 3 "BOLLETTE DOGA 

NPL I " :PRINT/P:GOSUB2480:PRINT/-PTPBC 103US 

ING"#****, III*I*" ;BD; :PRINT/PTPBC21 3USING" 1*1*1* 

,1*1***" ;X1 ; :PR INT ■'P" , 000" ;TPBC 333USING"*»I»I» 

,#****"5X2;:PRINT/P",000";TPBC553"-"5TPBC6 

73°-" ;TPBC69 3USING”l*l*** > »M*t*" ;X1 +X2;SPRINT 

/'P" i 000" 

920 2C03=2C03+BO:2C13=2C13+X1 :2C23=2C23+ 
X2:PRINT/P:IFCX=13*CY=1803THENPR1NVPTPB 
C373"T0TPLE":GOSUB2280 :GOTO50 
930 GOTO50 

940 PRINTTPBC153"RISCONTRO":FORJ=0TO5 :2C 
J 3 =0 :NEXT:FORK=1TO179 :1FOT* C K 3 = ""THEN960 
950 2C13=2C13+P0CK 3+P1CK3=2C23=2C23+B0CK 
3+B1CK3 :2C33=2C33+C0CK3+C1CK3 :2C43=2C43+ 
D0CK3+D1C K 3 
960 NEXT 

970 2C13=2C13+BI:2C23=2C23+BU:PRINT"BttBT 
otale registrazioni: ";RG:PRlNT”BBTotaI e 
imponibile: ";2C13:PRINT"BTotaI e I.U 

• P. : "J2C23:PRINT"BTotale Non Imp 

.-Es.: ";2C33 :PRINT"BTotale acquisti ar 

t.8 :" ;2C43 

980 PRINTTPBC203"-" :PRINf"Total 


e: ";2C13+2C23 + 2C33+2C43 :P 

RINT"BBPremere <CR>" :G0SUB21 40 :.GOTO50 
990 GOSU82030:GOSUB2050:GOTO50 
1000 REM***INI2IPLI22P2I0NE*** 

1010 PRINT"B" :PRINTTPB(123"INI2IPL122P2I 
ONE"SPRINT”Inserire i dati anagrafici de 
Ila Ditta."SPRINT"BRagione socia I e :":INP 
UTD1* SPRINT"Indi ri zzo:1NPUTD2*:PRINT"C 
ornare e sigla Provincia :":INPUTD3* 

1020 PRINT"Partita IUP:":PRINT'B - 

-" :PRINT"BB" ; :INPUTD4S :PRINT"Natura 

giuridica Csolo socieia'3 :"i:INPUTD5*:PR 
INT“Codice attiuiio' ; : INPUTD6*:PRINT"P 
ttiuita' esercitata:";:INPUT07* 

1030 PRINT"Pnno in corsoINPUTX:IFX<10 
00THENPRINT" Inserire l'anno in modo comp 
letO" :F0RK=1 TO3000.-NEXT :GOTO1030 
1040 PC=X:PP=X-1:PRINT“I dati inseriti s 
ono esatti? CS/'ND" 

1050 GET2S : IF2*="S"ThENl080 
1060 IF2*="N"THEN1010 
1070 GOTO 1050 

1080 GOSUB2030 M3OSUB2040:FORS=1T03000:NE 
XTSSGOTO50 

2000 nuSlC"fB0":RETURN 

2010 MUSIC"C0D0E0F0G0P0B0"SRETURN 

2020 MUSIC”-F9" :RETURN 

2030 PRINT"B":CURSOR0,4:PRINTTPBCC40-LEN 
CD1*33'23;D1* sPRINTTPBC C40-LENCD2S3 3^23" 
B" ;D2S:PRINTTPBCC40-LENCO3S33/'23"ffl" iD3*: 
PRINTTPBC83"BPPRTITP IUp: ";D4S:PRINTTPB 
C93"BBELENCO FORNITORI ";PC:RETURN 

2040 TEnPD7:DinDT*C1793,INSC1793,CM*C179 
3>PU*C1793,PI*C1793,RS*C1793>N0C1793,N1C 
1793,P0C1793,PIC1793,B0C1793,B1C1793. C0C 
1793', CI C1793,D0C1793,D1 C 1 793 , XC5 3 , YC53,2 
C53:RETURN 

2050 CURSOR0,17:PRINT"REGISTRP2I0NE PROG 
RPnriB " :PRINT"R i auuo I 9ere 

il nastro e premere <CR> ":G0SUB2140:PRI 
NT"Premere <RECORD-PLPY>" :SPUE"ELENCO FO 
RNITORI":U0PEN”DPTI":PRINT"Registruzione 
dai i ” 

2060 PR INT/-TD1 *, D2*, D3S ,04*. D5*, D6*, D7S, 
PC, 0P, BD, BI, BU, RG : CLOSE : UIOPEN " FORNITORI" 
2070 F0RK = 1T0179:PRINT/-TDT*CK3, INSCIO,Cn 
S C K 3,PUS CK3,PI*CK3,RS*CK3,N0CK3,N1CK3.P0 
CK3.P1CK3,B0CK3,B1CK3.C0CK3.C1CK3.D0CK3, 
DICK3:IFDTSCK3=""THEN2090 
2080 NEXT 

2090 CLQSE :GOSUB2010:RETURN 
2100 ROPEN"DPTI" : INPUT-'TD 1 *,D2S, D3S,D4S, 
D5S,D6S,D7S,PC,PP,BD,BI,BU,RG:CLOSE:RETU 
RN 

2110 R0PEN"F0RNITORI":F0RK=1T0179:INPUT^ 
TDTSCK3,IN*CK 3,CNSCK 3,PUSCK 3,PISCK3,RSSC 
K3.N0CK3.N1CK3.P0CK3.P1CK3.B0CK3.B1CK3.C 
0CK3.C1CK3,D0CK3,D1CK3:IFDT*CK3=""THEN21 
30 

2120 NEXT 

2130 CLOSE:GOSUB2010:RETURN 

2140 GET2*:IF2*=CHR*C133THENRETURN 

2150 G0T02140 

2160 CURSOR0,22:PRINT"Per confermare <CR 
> ":PRINT"Per correggere <C> " :RETURN 
2170 CURSOR0,22:PRINT"Per confermare la 
cancellazione premere <CR>":RETURN 
2180 C0NS0LE5,?0 SPRINT"B"SPRINT"Rag. soc 
iole: "5DTSCK3 :PRINT"BIndirizzo : " ; 

INSCK3:PRINT"BComune: ";CH*CK3:PR 

INT"BSIgI a Prov.: ";PUSCK3:PRINT"BPart 

ita IUP : ";PI*CK3 sPRINTTPBC153"- 

2190 PRINT'Pers.fisica=P":PRINT“Soc,eta' 
=S “5RSSCK3:CONSOLE:GOSUB2000:RETURN 
2200 CURSORI 3,6 :INPUTDTSCK):CURS0R13,8 :1 
NPUTINSCK3:CURS0R13,10 :INPUTCHSCK3:CURS0 


RI 3,12:1NPUTPUS CK 3:CURS0R13,14:INPUTPI*C 
K 3 :CURSOR13,17 :1NPUTRSS C K 3 : RE TURN 
2210 PRINT"B" : PRINTTPBC43"Bini1 ISSI ONE FP 
TTURE-REG1STR.N."1RG-H 

2220 PRINT"BRag. sociale: "JDTSCK):PRIN 
T"Indirizzo : "; INSCIO :PRINT"Comune : 

H ;CnsCK3:PRINT"Sigla Prov.: “;P 

USCK3:PRINT"Partita IUP: " ;PI*(KJ:IFRS 

SCK3“"P”THENPRINT"Persona fisica":RETURN 
2230 IFRS*CK3“"S"THENPRINT"Societa'":RET 
URN 

2240 PRINT"Indic.errala Pers.fisica^Soci 
età'" :RETURN 

2250 FORJ=1TO5:YCJ3=0:NEXT:RETURN 
2260 nODE TN:PRINT/'PTPBCC40-LENCD1*33-'23 
IDI * :PRINT^PTPBC C40-LENCD2S3 3/-23 ID2S :PRI 
NT/PTPBC C40-LENCD3S3 3^23 JD3S:PRINT/PTPBC 
83"PPRTITP IUP: ";D4S 

2270 PRINT/'PTPBC 1 03 "Natura giuridica: "! 
05* :PRINT/”PT PBC93 "Cod ì ce attivila': " ;D6 
*:PRINT/P:PRINT/P"Pttivita' esercitata: 

" 5D7S JPRINT/'P sPRINT/PTRECSI-ELENCO FORNI 
TORI "5PC:RETURN 

2280 PRINT/"P :PRINT/'P"- 


-" : PRINT/'PTPBC 1 03USI 

NG"«MM», J2C03 ; :PRINT/PTPBC21 3USING,"## 
#, ##♦»" ;2C 1 3 5 :PRINT^P",000" ;TPBC33)USING" 
###,###";2C23; 

2290 PRINT-'P", 000" ;TPBC453USING"#«t», tMMl" 
;2C33 ; :PRINT/P",000";TPBC573USING"#«#, 

#";2C43;:PRINT/P",000"iTPBC633USING"IMMt, 
IMM* " 52C 1 3+2C23+2C33+2C43 ; :PRINT/-P" , 000" : 
PRINT^P:RETURN 

2300 FORJ=1TO5:XCJ3=0:YCJ3=0:NEXTJ 

2310 IFP0CK3-INTCP0CK3/10003*1000<500THE 

NXC 1 3 = INTCP0CK3-'l 000 3 :GOTO2330 

2320 XC1 3 = INTCP0CK3>'10003 + 1 

2330 IFB0CK3-INTCB0CK3«'l 0003*1000<500THE 

NXC23 = INTCB0CK3^10003 :GOTO2350 

2340 XC23=INTCB0CK3^10003+1 

2350 IFC0CK3-INTCC0CK3/10003*1000<500THE 

NXC33 = INTCC0CK3/'10003 :GOTO2370 

2360 XC33=INTCC0CK3/10003+1 

2370 IFD0CK3-INTCD0CK3z10003*1000<500THE 

NXC43 = INTCD0CK3-'10003 :GOTO2390 

2380 XC43=INTCD0CK3^10003+1 

2390 IFP1CK3-INTCP1CK3^10003*1000<500THE 

NYC13*1NTCPICK3/U 0003:G0T02418 

2400 YC13=INTCP1CK3^10003+1 

2410 IFB1 CK3-INTCB1 CIOO 0003*1 000<500THE 

NYC23 = INTCB1CK3/M 0003:GOTO2430 

2420 YC23 = INTCB1 CK3O0003 + 1 

2430 IFC1CK3-INTCC1CK3/10003*1000<500THE 

NYC33»INTCC1 CK3O0003 :GOTO2450 

2440 YC33=INTCC1CK3^10003+1 

2450 IFD1 CK3-INTCD1 CIOO 0003*1 000<500THE 

NYC4) = INTCD1 CK3/-10003 :GOTO2470 

2460 YC43»INTCD1CK3^10803+1 

2470 RETU?N 

2480 X1=0 :X2=0:1FBI-INT CBI / 10003* 1 000<50 
0THENX1 “INTCBIO0003 :GOTO2500 
2490 X1=INTCBI/10003+1 

2500 IFBU-1NTCBU/-10003*1 000<500THENX2-1N 
TCBUO0003 :GOTO2520 
2510 X2=INTCBUO000J + I 

2520 RETURN 

3000 IFERN=3THENGOSUB2020:G0T03100 

3100 IFCERL=1603 + CERL=210 3 + CERL=4603 + CER 

L=5703THENPRINTTPBC293"ffi "1:RESUHE 

3110 IFERL=230THENPRINTTPBC233"03";:RESU 

HE 

3120 IFCERL=2603+CERL=3503THENPRINT"B" i : 
RÉSUMÉ 

3130 IFERL=400THENPRINTTPBC23)”B " ; :RFSU 
ME 

3140 IFERL=760THENPRINTTPBC243"B ";:RESU 

ME 
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co anche i dati anagrafici 
della vostra ditta. 

7 —RISCONTRO 

È utile per eseguire confron¬ 
ti con il registro IVA: con tale 
opzione vengono visualizza¬ 
ti i totali degli importi im¬ 
messi nonché il numero to¬ 
tale di registrazioni esegui¬ 
te. Occorre ricordare che, 
qualora una delle cifre ecce¬ 


de i 100 milioni, i valori sono 
forniti in forma esponenziale 
con approssimazione alla 
decina di lire. 

Vogliamo sperare che le 
spiegazioni sul funziona¬ 
mento del proramma siano 
comprensibili ed esaurienti: 
vi consigliamo, comunque, 
di eseguire una prova con 
tre o quattro fornitori e rela¬ 
tive fatture onde prendere 


dimestichezza nel suo uso e 
poter controllare manual¬ 
mente i totali calcolati dal 
computer: ciò soprattutto al¬ 
lo scopo di correggere even¬ 
tuali errori occulti di trascri¬ 
zione del listato. 

— arrivati ad una fase di 
scelta, anche se non indica¬ 
to sul video per motivi di 
spazio, è possibile tornare 
al menù premendo il tasto 



interrompendo cosi qua¬ 
lunque sequenza di immis¬ 
sione iniziata. 

— premendo «SHIFT- 
BREAK» potete uscire in 
qualunque momento dal 
programma (anche durante 
la fase di stampa) e rientrar¬ 
vi con il comando «RUN 50»: 
il programma riprende dal 
menù mentre i dati immessi 
non vanno perduti. 


SHARP “ ' 

Il famosissimo gioco 
a carte del... 



VIDEOGAME 

di E. Fabrizi 



MEDIA Tempo 

DIFFICOLTA di esecuzione 

3 ORE 


on poteva mancare, 
per gli affezionati let¬ 
tori che utilizzano lo 
Sharp MZ-700, una versione 
del classico gioco del «Sette 
e mezzo». 

Il gioco è virtualmente iden¬ 
tico a quello reale poiché il 
banco può essere tenuto sia 
dal computer che dal gioca¬ 
tore mentre la «matta» (K di 
cuori) conserva le stesse 
funzioni. Inizialmente il ban¬ 
co viene assegnato a chi al¬ 
za la carta più alta, quindi, 
durante lo svolgimento del 
gioco, può entrare in pos¬ 
sesso sia del computer che 
del giocatore qualora uno 
dei due realizzi il punteggio 
di sette e mezzo con due so¬ 
le carte. 


È superfluo puntualizzare 
che il computer gioca in ma¬ 
niera assolutamente «one¬ 
sta», basando le proprie de¬ 
cisioni solo sulle carte che il 
giocatore ha eventualmente 
chiesto ed ignorando la pri¬ 
ma uscita: è stato solamente 
aggiunto un pizzico di im¬ 
prevedibilità di comporta¬ 
mento nelle puntate del 
computer e nelle sue valuta¬ 
zioni sull’opportunità se fer¬ 
marsi o chiedere carta. 

Struttura del programma 

Dopo una parte introduttiva 
comune (da R.40 a R.220), lo 
svolgimento del gioco è con¬ 
trollato da due routines simi¬ 
li che funzionano in esclu¬ 
sione reciproca: la prima (da 


R.1000 a R.1250) quando il 
banco è gestito dal giocatore 
e la seconda (da R.2000 a 
R.2150) quando lo stesso è 
gestito dal computer. Il con¬ 
trollo della routine da ese¬ 
guire è affidato alla variabile 
B a R.170 e 180: se il banco è 
del giocatore, B è posta 
uguale ad 1 e viene quindi 
eseguita la routine da 
R.1000, altrimenti B è posta 
uguale a 0 e viene eseguita 
la routine da R.2000. 

Molte decisioni del com¬ 
puter sono legate al valore 
di un numero casuale H 
estratto nella subr.5500: le 
scelte sono cosi parzialmen¬ 
te influenzate da una casua¬ 
lità che rende il comporta¬ 
mento del computer meno 


prevedibile e contribuisce 
ad animare il gioco. 

R.40-50 

Titoli e presentazione. Viene 
ristretta l'area di scorrimen¬ 
to video per ottenere la cor¬ 
nice; mediante la subr.5040 
è stampato il titolo (giallo su 
fondo nero), quindi viene 
eseguita la musica (R.40). Si 
sceglie in modo casuale un 
codice di colore assegnan¬ 
dolo alla variab.C (da 1 - blu 
a 7 - bianco) e, mediante la 
subr.5040 il titolo è di nuovo 
stampato con il colore 
estratto: scelta e stampa 
procedono fino a che non 
viene premuto un tasto 
(R.50). 

R.60 

Dimensionamento dei vetto- 
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QUADD MZ700 


Omini SETTE E MEZZO 




ri che verranno successiva¬ 
mente utilizzati per definire 
simboli e valori delle carte. 

R.70-80 

Viene definito il capitale ini¬ 
ziale a disposizione sia del 
computer che del giocatore 
(var.CP - R.70) quindi il me¬ 
desimo è visualizzato in alto 
a sinistra, mentre compare 
il messaggio che preannun¬ 
cia il sorteggio del banco 
(R.80). 

R.90-110 

Mediante la subr.5090 sono 
letti i «DATA» per formare il 
mazzo di carte; dopo averne 
definita la posizione sullo 
schermo (X,Y) il mazzo co¬ 
perto viene stampato (su- 
br.5070) (R.90). Dopo aver 
premuto un tasto (R.100) vie¬ 
ne scelto casualmente (su- 
br.5100) uno dei vettori che 
definiscono le carte: la carta 
estratta è stampata scoperta 
in posizione X,Y (subr.5080); 
in relazione al suo simbolo e 
seme vengono calcolati (su- 
br. 5120 e 5170) i valori asso¬ 
luti (P) e di seme (Q) della 
carta assegnando al gioca¬ 
tore i punteggi PG e QG. La 
carta estratta viene elimina¬ 
ta dal mezzo annullando la 
variab.A$(W) (R.110). 

R.120 

Con modalità identiche vie¬ 
ne estratta un'altra carta e i 
punteggi calcolati sono attri¬ 
buiti al computer nelle var. 
PC e QC. 

R.130-180 

Sono confrontati i punteggi 
PC e PG (relativi al valore 
numerico della carta) 
(R.130-140); in caso di parità 
vengono confrontati i pun¬ 
teggi QC e QG (relativi al va¬ 
lore del seme) (R.150-160). È 
pertanto cosi definito il valo¬ 
re di B (0 o 1) e, di conse¬ 
guenza, la routine da attiva¬ 
re (R.170-180). 

R.190-220 

Elenco dei «DATA» che defi¬ 
niscono le carte, letti nella 
subr.5090. Ogni carta è ca¬ 
ratterizzata da 4 variabili 
che ne definiscono nell'ordi¬ 
ne: 

— A$(K): simbolo 

— B$(K): seme (carattere 
grafico) 

— C(K): colore rosso (cod.2) 
per cuori (F3) e quadri (FA) o 
colore nero (cod.0) per pic¬ 


che (E1) e fiori (F8) 

— A(K): valore della carta 
nel gioco (le figure, ad 
esempio, valgono mezzo 
punto). Solo il valore della 
matta (K di cuori - R.190) è 
posto a 0 poiché esso è va¬ 
riabile in relazione alle carte 
già uscite durante il gioco. 

R.1000 

Routine banco al giocatore. 

Sono azzerate le variabili M 
(controllo punteggio nel ca¬ 
so di uscita della matta), PG 
(punteggio giocatore), PC 
(punteggio computer) e K; 
quest'ultima, unitamente a 
J, assume diverse funzioni: 
controlla i «loops» per l'usci¬ 
ta progressiva delle carte, 
determina con il suo valore 
la posizione delle stesse sul¬ 
lo schermo e, inoltre, per¬ 
mette al programma di valu¬ 
tare se la carta in esame è la 
prima, la seconda, la terza... 
uscita; ciò è importante poi¬ 
ché il punteggio di sette e 
mezzo raggiunto con due so¬ 
le carte comporta il cambio 
del banco. 

Lo schermo viene «pulito» 
(subr.5210) e ripristinato il 
mazzo completo di carte (su¬ 
br.5090); sono stampate due 
carte coperte (subr.5070) 
nelle posizioni X,Y, nonché 
le indicazioni per le opzioni 
«carta/sto» (subr.5640). Il 
gioco è iniziato dal compu¬ 
ter: viene estratta una carta 
(subr.5100) ed il suo valore 
(A(W)) è assegnato al pun¬ 
teggio del computer (PC); gli 
altri dati caratteristici della 
carta (simbolo, punteggio, 
colore) sono trasferiti alle 
variabili A1$, B1$ e CI: la 
carta, infatti, dovrà essere 
soperta al termine della par¬ 
tita ed il trasferimento con¬ 
sente al computer di «ricor¬ 
darla». Viene infine annulla¬ 
ta la variab. A$(W) per esclu¬ 
dere la possibilità di una ul¬ 
teriore estrazione della stes¬ 
sa carta (cfr. R.5100). 

R.1010-1070 

Viene estratto (subr.5500) il 
numero casuale H che deve 
risultare superiore a 0.35 
(R.1010). Il programma cal¬ 
cola la somma da puntare 
(G) in base al valore della 
prima carta estratta (PC) con 
l’opportuna correzione da 
parte di H (R.1020-1060) 


quindi controlla che la pun¬ 
tata non ecceda il capitale 
disponibile: in caso afferma¬ 
tivo l'ammontare viene ridi¬ 
mensionato (R.1070). 

R.1080-1090 

Viene visualizzata la puntata 
e valutato il punteggio acqui¬ 
sito, nonché la decisione da 
prendere, mediante la su- 
br.5670: se la scelta è di 
prendere un’altra carta, il 
programma continua a 
R.1090 con l'estrazione (su¬ 
br.5100) e visualizzazione 
(subr.5080) della carta, ag¬ 
giornamento del punteggio 
(PC) e valutazione delle de¬ 
cisioni (subr.5670). 

R.1100 

Per motivi di spazio, posso¬ 
no essere visualizzate sullo 
schermo solo 5 carte: le al¬ 
tre eventualmente richieste 
sono stampate, a destra del¬ 
l’ultima estratta, in formato 
ridotto; il «loop» di R.1100 
provvede a questo tipo di vi¬ 
sualizzazione svolgendo, 
per il resto, le stesse funzio¬ 
ni di quello a R.1090. 

R.1110 

Se alla subr.5670 viene pre¬ 
sa la decisione di stare e il 
punteggio formato dal com¬ 
puter è inferiore a sette e 
mezzo, è visualizzato il mes¬ 
saggio «sto» (subr.5640 e 
5660). 

R.1120 

È ora il turno del giocatore. 
Vengono azzerate M e J, 
estratta una carta (su¬ 
br.5100) che è stampata sco¬ 
perta in X,Y (subr.5080) 
mentre il suo valore è asse¬ 
gnato al punteggio del gio¬ 
catore (PG) che viene con¬ 
trollato (siibr.5890). 

R.1130-1210 

Inizia, comandata dal gioca¬ 
tore, l’eventuale estrazione 
di altre carte con i due «loo¬ 
ps» controllati da J (R.1130 e 
1170). Se il giocatore vuole 
stare, preme il tasto «S»: 
compare la conferma del¬ 
l'opzione scelta (subr.5660) 
e l’esecuzione del program¬ 
ma riprende da R.1220 
(R.1140). Se viene invece 
premuto il tasto «C» (R.1150) 
il «loop» continua con la 
conferma della scelta (su- 
br.5650), estrazione di una 
altra carta (subr.5100), vi¬ 
sualizzazione (subr.5080), 


aggiornamento punteggio e 
sua valutazione (subr.5890) 
(R. 1150). Da R.1170 a 1210 si 
sviluppa un analogo «loop» 
per la stampa delle carte in 
formato ridotto. 

R.1220-1230 

Valutazione del punteggio fi¬ 
nale conseguito dal giocato¬ 
re, che tiene conto se è stata 
estratta la matta (M = 1): in 
caso affermativo il punteg¬ 
gio è portato a 7 se non so¬ 
no state estratte figure (as¬ 
senza di mezzi punti 
-R.1220) o, in caso contrario, 
a 7 e mezzo (R.1230). Poiché 
il banco appartiene già al 
giocatore, non è necessario 
il controllo per l’eventuale 
cambio. 

R.1240-1250 

Viene stampata la prima 
carta estratta dal computer 
(subr.5880) nonché i punteg¬ 
gi (subr.5480). In caso di vit- 
toriadelgiocatore(PG > =PC 
- R.1240) la subr.5450 prov¬ 
vede alla visualizzazione 
degli opportuni messaggi e 
aH'aggiornamento del capi¬ 
tale. Analoga funzione è 
svolta dalla subr.5370 in ca¬ 
so di vittoria del computer 
(PG < PC - R.1250). 

R.2000 

Routine con banco al com¬ 
puter. Sono azzerate le va¬ 
riabili, pulito lo schermo (su¬ 
br.5210), ripristinato il maz¬ 
zo di carte completo (su¬ 
br.5090), estratta la prima 
carta del giocatore (su¬ 
br.5100) e stampata scoper¬ 
ta (subr.5080) mentre quella 
del computer viene visualiz¬ 
zata coperta. Il valore (A(W)) 
è assegnato al punteggio del 
giocatore, mentre l’assegna¬ 
zione a PI serve a «ricorda¬ 
re» il valore della prima car¬ 
ta estratta (cfr.subr.5510). 
Segue la valutazione del 
punteggio, soprattutto in re¬ 
lazione all’eventuale uscita 
della matta (subr.5220). 
R.2010 

Viene richiesto l'ammontare 
della puntata (G) e controlla¬ 
to che non sia superiore al 
capitale disponibile. 

R.2020-2100 

Iniziano i «loops» per l'usci¬ 
ta delle carte: il funziona¬ 
mento è analogo a quello 
della routine descritta da 
R.1130 a R.1210; l’unica dif- 
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ferenza è nella subr. di va¬ 
lutazione del punteggio con¬ 
seguito (R.5220 in luogo di 
R.5890) poiché, in questo ca¬ 
so, occorre tener conto del¬ 
l'eventuale cambio di banco. 
R.2110-2120 

Valutazione del punteggio fi¬ 
nale conseguito dal giocato¬ 
re, che tiene conto se è stata 
estratta la matta (M = 1). 

R.2130 

È ora il turno del computer. 
La carta viene estratta (su¬ 
br.5100) e stampata nella 
stessa posizione occupata 
da quella coperta visualizza¬ 
ta all'inizio della partita (su¬ 
br.5080); è assegnato il pun¬ 
teggio PG. 

R.2140-2150 

Iniziano i «loops» per l'estra¬ 
zione delle carte: il compu¬ 
ter calcola il punteggio al 
suo attivo (subr.5300) e valu¬ 
ta se stare o chiedere carta 
(subr.5510); nel secondo ca¬ 
so la subr. ritorna al pro¬ 
gramma che procede con 
una ulteriore estrazione me¬ 
diante la subr.5600, mentre 
nel primo caso l'esecuzione 
salta, direttamente dalla su¬ 
br.5510, ad altri punti del 
programma in base ai pun¬ 
teggi ottenuti da giocatore e 
computer. 

R.5000-5020 

Subr. segnali acustici. 

R.5030 

Subr. per inserire un ritardo 
nell’esecuzione di alcune 
parti del programma. 


R.5040-5060 

Subr. stringhe di caratteri 
grafici per la stampa del tito¬ 
lo. 

R.5070 

Subr. stampa carta coperta 
a partire dal punto di coordi¬ 
nate X,Y (assegnate nella 
routine). 

R.5080 

Subr. stampa carta scoperta: 
i simboli sono quelli estratti 
casualmente nella su- 
br.5100. 

R.5090 

Subr. lettura dei ««DATA» per 
la formazione o il ripristino 
del mazzo di carte completo. 

R.5100-5110 

Subr. estrazione di una carta 
mediante scelta di un nume¬ 
ro casuale (W) compreso fra 
1 e 40; se la carta risulta già 
estratta (A$(W) nulla), l’ope¬ 
razione viene ripetuta. 

R.5120-5200 

Subr. asegnazione punteg¬ 
gio durante il sorteggio ini¬ 
ziale del banco: il valore del¬ 
la carta estratta viene valu¬ 
tato in base al simbolo 
(R.5120-5150) e al seme 
(R.5170-5200). 

R.5210 

Subr. per la ««pulizia» dello 
schermo dopo ogni partita: 
la cancellazione avviene in 
maniera più lenta di quella 
ottenuta con il semplice 
«PRINTC». 

R.5220-5290 

Subr. calcolo punteggio del 
giocatore quando questi gio¬ 


ca per primo (banco del 
computer). Il punteggio vie¬ 
ne calcolato tenendo conto 
dell’eventuale uscita della 
matta (M posto uguale a 1 in 
R.5220); se si è formato il 
sette e mezzo con due sole 
carte (J = 8) viene predispo¬ 
sto il cambio del banco nella 
partita successiva (B è posto 
uguale a 1). 

R.5300-5350 

Subr. calcolo punteggio del 
computer nel caso che il 
banco sia in suo possesso: 
non è previsto, infatti, un 
eventuale cambio. 

R.5360-5490 

Subr. con i messaggi visua¬ 
lizzati durante la partita. 

R.5500 

Subr. scelta del numero ca¬ 
suale H. 

R.5510-5590 

Subr. valutazione decisioni 
del computer quando il ban¬ 
co è in suo possesso e gioca 
quindi come secondo. I con¬ 
fronti con il punteggio com¬ 
plessivo del giocatore (PG) 
avvengono solo se quest’ul¬ 
timo ha realizzato il sette e 
mezzo (che viene dichiara¬ 
to): in tutti gli altri casi il 
computer tiene conto solo 
delle carte scoperte (PG-P1) 
mentre la decisione è in¬ 
fluenzata in maniera parzial¬ 
mente casuale dal valore 
della variabile H. 

R.5600 

Subr. per l'estrazione di una 
carta (cfr. R.2140). 


R.5610-5630 

Routine per avviare una 
nuova partita. 

R.5640-5660 

Subr. per la conferma della 
scelta ««carta» (R.5650) o 
«sto» (R.5660): mentre il 
messaggio compare sempre 
nero su fondo rosso. 

R.5670-5860 

Subr. per il calcolo del pun¬ 
teggio realizzato dal compu¬ 
ter (PG) e della decisione da 
prendere quando il banco è 
del giocatore. Il computer, in¬ 
fatti, gioca per primo e valuta 
se stare o chiedere carta in 
base al punteggio acquisito 
(PC) e al numero casuale H; 
è previsto l’eventuale cam¬ 
bio di banco. Notate che que¬ 
sto è l’unico caso in cui il 
computer deve decidere se 
stare o chiedere carta senza 
alcuna indicazione oggettiva 
su cui basare la scelta (il gio¬ 
catore non ha ancora realiz¬ 
zato alcun punteggio in tavo¬ 
la): ciò giustifica il numero 
relativamente elevato di op¬ 
zioni («IF») previste. 

R.5870 

Subr. messaggio. 

R.5880 

Subr. per la visualizzazione 
della prima carta estratta 
(cfr.R.1000). 

R.5890-5930 

Subr. calcolo punteggio del 
giocatore quando il banco è 
in suo possesso: non è pre¬ 
visto, infatti, il cambio di 
banco. 


'0 REM* SETTE E MEZ20 * 

20 REM* BY E.FABRIZI-1984 * 

30 REM* SHARP MZ-700 * 

40 COLOR,,0,3=PRINT"B":C0NS0LE4,19,3,34= 
PRINTC,03"B":C=6 =GOSUB5040:TEMPO?=MUSIC" 
C5E5F5G5R7C5E5F5G5R7C5E5F5G7E7C7E7D7R9E3 
R3E5D5C5R7C5E7G5R5G5F7C5E5F5G7E7C707C9" 
50 C=INT(RNDC13*7+1 3=GOSUB5040 =PRINTTABC 
13) "fflfflPrem 1 un tasto"=GETZ$ : IFZ*=""THEN5 
0 

60 DIMA*C403,B*(403,CC403>A(403 
70 CONSOLE =C0L0R, ,0,4 iPRINT-'B” =CURS0R5,7 
=PRINTC?,2]" Il nostro capitale ammonta 
a " iPRINTC2,7]TABC133' fflffl Lire 100,000 " = 
PRINTC0,5]TAB( 153"BIB ciascuno "=GOSUB503 
0=CP=100000 

80 PRINT"B"JCURSOR0,1 =PRINTC7,0]"CapitaI 
e Lit. " JLISING" UH#, Wttl»" ;CP ! =CURS0R 1,23 =P 
RINTC7i03"Oediamo chi tiene il banco 

90 GOSUB5030 =GOSUB5090 =X=1I =Y=9=GOSUB507 
0 =CURSORI,23 =PRINTC7,0]"Per alzare premi 
un tasto 

100 GETZ* =IFZi=""THEN100 
I10 G0SUB5100=X=22=Y=15 =GOSUB5080 =G0SUB5 
I 20 =G0SUB5170 = PG=P :QG=0 =A*CU3= nn 
120 CURSORI,23=PRINTC7,03"Alzo io S 

";=GOSUB5030 =G0S 


UB51 00 =Y=3=GOSUB5080 =G0SUB5120 =G0SUB5170 

:PC=P=QC=Q =GOSUB5010 =GOSUB5030 

130 IFPG>PCTHENB=1 =GOTOI70 

140 IFPG<PCTHENB=0:GOTO1?0 

150 IFQG>QCTHENB=1=GOTO170 

160 B=0 

170 IFB=1THEN1000 
180 IFB=0THENCURSOR0,0 =PRINTC,4]" 

" ; =GOTO2000 

190 DATA A,F3,2,1,2,F3.2,2.3,F3,2.3.4■ F3 
,2,4,5,£3,2,5,6, £3,2,6,7, £3, 2, 7, J ,£3,2, . 
5,Q,F3,2,.5,K,£3,2,0 

200 DATA A.FA.2,1,2,FA,2,2,3, FA,2,3,4,FA 
,2,4,5,£A, 2,5,6 ,£A, 2,6,7, FA, 2,7, J , FA_, i , . 
5,Q,FA,2,.5,K,FA,2,.5 

210 DATA A,E1,0, 1, 2, j£l , 0, 2,3,£1., 0,3,4, E£ 
,0,4,5,|J ,0,5,6, EJ., 0,6,7, El, 0,7, J,Ei,0, . 
5, Q, EJ , 0,. 5, K,£J., 0,. 5 

220 DATA A,£8,0,1,2,£8,0,2,3,£8,0,3,4,£8 
,0,4,5,£8,0,5,6,£8,0,6,7, £ 8 , 0,7,J , £8 , 0, . 
5,Q,£8,0,.5,K,£8,0,.5 

1000 M=0 :PG=0 =PC=0 =K=0 JCURSOR0,1 =PRINTC7 
, 0 3TABC 233 " II banco e' tuo" =CURS0RI , 23=P 
RINTC.03" "JJGOSUB5210JGOS 

UB5090 =X=I=Y=4 =GOSUB5070 = T=14 =GOSUB5070: 
GOSUB5640 =G0SUB5100 = PC=ACU 3=AI*=A*CU3=B1 
*=B*CW3 :Ci=rCU)= A* CW3 = "" 

1010 GOSUB5500 = IFH<.35THEN1010 


1020 IFPC=0THENG=INTC11000*H/10003*1000= 
GOTO1080 

1030 IFPC=7THENG=INTC7000*H/'1000 3*1000=G 
OTOI080 

1040 IFPC=6THENG=INTC5000*H-' 1 0003*1 000 =G 
OTO1080 

1050 IF CPC <=5 3 * CPC <> . 5 3THENG=INTC3000*H/ 
10003*1000=G0T01080 

1060 IFPC =. 5THENG= I NT C 5000*H/-10003*1000 = 
GOTO 1080 

1070 IFG>200000-CPTHENG=200000-CP 
1080 CURSOR0,0 = PRINTC7,23"La mia puntata 
= " JUSING"##, t*#W" ;G; =GOSUBS000=GOSUB56?0 
1090 F0RK=8T029STEP?=GOSUB5640 =GOSUB5650 
:X=KJY=4= GOSUB5030= G0SUB5100=GOSUB5080 =P 
C=PC+ACLI3 =A*CW3 = " " =GOSUB5670 =NEXTK 
1 I 00 F0RK=4T010 =GOSUB5640 = GOSUB5650 =X«=36 
: Y=K = G0SUB51 00 = CURSORX, Y :PRINTCCCUI3,73A$ 
CW3 ;B*CW3 =PC=PC+ACU13 =A*(UI3 = "" =GOSUB5670 = 
GOSUB5030 =NEXTK 

1110 IFPC<7.5THENGOSUB5030 =GOSUB5640 =G0S 
UB5660 

1120 M=0:J=0 =GOSUB5030 =G0SUB5100 =X=1 =Y=1 
4 = GOSUB5080 = CURS0R1,23 =PRINT C 7,0 3" 

Tocca a te "=PG=ACW 

3 =A*CU3 = ""=GOSUB5830 

1130 FORJ=8TO29STEP7=GOSUB5640=X=J =Y=14 
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SHARP 


MZ700 

SETTE E MEZZO 


1 140 GET2* '• IF2*="S"THENGOSUB5660 : GOT0122 
0 

1150 IF2*="C"THENGOSUB5650sGOSUB5100:GOS 
UB5080sPG-PG+AC U)sA*(W3="":GOSUB5890:GOT 
01170 

1160 G0T01140 

1170 NEXTJsFORJ“l4TO20sX=36sY=J 
1180 GET2* sIF2* = "S"THENGOSUB5660:GOT0122 
0 

1190 IF2*- ”C , 'THENGOSUB5650:GOSUB5100:CUR 
S0RX,Y:PRINT[C(U3,?JA*CU35B*CU3sPG=PG+AC 

U) :A*CU3" GOSUB5890:GOT01210 

1200 G0T01180 
1210 NEXTJ 

1220 GOSUB5030:1FCn=13*CPG-INTCPG3=0JTHE 
NPG=7 

1230 IF(n-13*CPG-INTCPG3*.53THENPG=7.5:G 
OTO5920 

1 240 GOSUB5880:GOSUB5480:IFPG>=PCTHENS45 
0 

1250 GOTO5370 

2000 H=0 :P1=0:PG=0:PC=0:J=0SCURSOR0,l:PR 
1NTC7.03TABC233" I I banco e' m i o" :G0SUB52 
10:GOSUB5090:G0SUB5100:X=1:T=14:GOSUB508 
0:Y=4sGOSUB50?0:P1=ACUI3 :PG=P1 SGOSUB5220: 
A*CU3-"" 

2010 CURSORI i 23 : COLOR . ,7,0:PRINT"Quanto 
uuoì 9 locare “5 SPRINT" 

fflB":CURSOR20,23 :1NPUTG:IFG>CPTHENPRINT[7 
.03TA8C 1 3"BE' troppo! 

"; :GOSUB5030:GOTO2010 
2020 GOSUB5640:F0RJ =8T029STEP7:GOSUB5640 
:X=J sY=14 

2030 GET2*sIF2*="S"THENGOSUB5660sGOTO21 1 

0 

2040 IF2*="C"THENGOSUB5650:GOSUB5I00:GOS 
UB5080sPG=PG+A(U)sA*(U3="":GOSUB5220 :G 0 T 
02060 

2050 GOTO2030 

2060 NEXTJsFORJ"I4TO20 :GOSUB5640:X=36 : Y = 

J 

2070 GET2*:IF2*="S"THENGOSUB5660:G0T02I1 
0 

2080 IF 2* “ " C " THENGOSUB5650:GCSUB5100 :CUR 
SORX,YsPRINTCCCW3,73A*CU3;B*CW3:PG*PG+AC 

U3 sA*(W3».. 

2090 GOTO2070 
2100 NEXTJ 

2110 GOSUB5030:1F CH =13*(PG-1NTCPG3=03THE 


NPG-7 

2120 IFCn-13*(PG-INTCPG3=.53THENPG»7.5sG 
OSUB5870 

2130 X-1 :Y-4:K=0:ri = 0:GOSUB5100:GOSUB5080 
sPC=ACW3:A*CW3“"" 

2140 F0RK-8T029STEP7:GOSUB5300:G0SUB5510 
:GOSUB5030:GOSUB5600:NEXTK 
2150 FORK -4 T010 : GOSUB5030:GOSUB5300 : GOSU 
85510 :GOSUB5030sx»36sY=K:GCSUB5100sCURSO 
RX,Y:PRINTCCCU3,?3A*CU3;BÌCW3sPC=PC+ACU3 
SA*(W3 -""snEXTK 
5000 riUSIC"*Cl " sRETURN 
5010 HUSIC’C0O0E0F8G0A080"sRETURN 
5020 nuSIC"-F9"sRETURN 
5030 FORS-1TO2000SNEXTSsRETURN 
5040 COLOR,,C.0SPRINTBBB C8C8C8C8C8C8C 
BC8 E5Cg"SPRINT" C8 C8 

££ Cfi"SPRINT" C8C8 

C8 F5C9 " SPRINT" F. 

5C8C9 C8 F5C9"SPRINT" 

F5C8C9 C8 

5050 PRINT" F5C8C9 
8 F5C9 "SPRINT" F5C8C9 

F5C9F5C8C8E9 "SPRINT" F5C8C9 
C8D808 F5C9 C8 ££" SPRINT" F5_ 

C8C9 FEC8C9 F5C9 F5C9 "s 

PRINT" C8C8 F5C9 £. 

5C9 " 


5060 PRINT" C8C8 
F5C9 "SPRINT" C8C8 
C8C8C8C8 "SRETURN 

5070 FORS*0TO6sCURSORX,Y»SSPR1NTC7, ! 3 1 35 

9595959595 "SNEXTSIRETURN 

5080 CURSORX,YsPRINT[,?I" "sPRINTCC 

CW3 » 73 TABCX3" " iA»(U31" ";B»(WJ5" “ : FOR 

S=1T03 SPRINTI,73TABIX3" "sNEXTSsPRI 

NTCCCM3,73TAB(XJ* 

sPRINTC.?3TAB(x3" "sRETURN 

5090 RESTORE sF ORK-1TO40 sREADA* CK 3,B* CK3. 

CCK3.ACK3sNEXT sRETURN 

5100 W=INTCRNOC11*40+13 sIFA*IU3 = ""THEN5I 
00 

5110 RETURN 

5120 IFA*CU 3J"THENP=8sRETURN 
5130 IFA*CI43 = "Q" THENP=9 sRETURN 
5140 IFAtCU)«"K"THENP"10 sRETURN 
5150 IFA*(U3“"A"THENP=11sRETURN 
5160 P=ACU3SRETURN 
5170 IF8*CU)“"£2" 7 HENQ=4 sRETURN 
5180 IFB*(U)»"£B"THENa*3sRETURN 
5190 IFB* I LI 3 *"£1 "THENQ=?sRETURN 
5200 IFB*tW3-"F8"THENQ=1sRETURN 
5210 CURSOR0,2 sFORS=1T020 sPRINT C,4 ] " 

";sn 

EXTS :C0NS0LE2,21 sPR INTC, 4 3 "83" sCONSOLE :RE 
TURN 

5220 IFACUI3“0THENt1=1 

5230 IFPG> 7.5THENCURS0R2,22 sPRINT C 0,63" 
HAI SBALLATO! "SGOTO5370 
5240 IFCri=1 3*CPG«?3*CJ>B3THENPG=7.5 
5250 IFCN=1)*(PG=73*(J=83THENPG=7.5 =B=I 
5260 IFCr-13*CPG=.53THENPG=7.5sB=l 
5270 IFCPG=7.53*(J=*83THENB=1 
5280 IFPG=7.5THENGOSUB5870SG0T02130 
5290 RETURN 
5300 IFAtW3=0THENn=1 

5310 IFCfl" 1 3*(PC“73THENPC=7. 5 
5320 IFCM-13*CPC-INTCPC3=03THENPC=7 
5330 IFCI1=13*CPC-INTCPC3=.53THENPC=7.5 
5340 IFPC>7.5THENCURS0R2,2 sPRINTC0,63" 

HO SBALLATO! "SGOTO5450 
5350 RETURN 

5360 CURS0R2.2sPRINT[0,63" SETTE e HE Zi 
0 "JSGOSUB5020sRETURN 
5370 CURSORI.23SPRINTI7,03" 

Uinco io! ";sCP=CP-GsCURS 

ORI 4, 1 SPRINTI 7,03USING'WWtt,Mtìtt" ;CP’;sGOSU 
B5020sIFCP<-0THEN5390 
5380 GOTO5610 

5390 CURSORI.23SPRINTC7,01" H 

al perso tutto! "jSGOSUB5000:GO 

SUB5030SCURSORI,23SPRINTC7.03" Per un' 

altra partita premi <CR> "ì 

5400 GET2*:IF2*"""THEN5400 

5410 1F2* S CHR*(133THEN40 

5420 T* = "ARRIUEDERCI"sPRINT"B"SCURS0R14, 

14 sF0RJ = 1 T0LEN(T*3 5PRlNU7,23niO»CT*, J, 1 
3 ;SGOSUB5000 SNEXT SCURSOR0.22 sEND 
5430 GOSUB5030SCURSORI,23sPRlNTC7,03" 

sto! "; : go 

SUB5000 SGOSUB5030 SGOSUB5480 
5440 IFPO-PGTHEN5370 
5450 CURSORI.23SPRINTC7,03" 

Uinci tu! ";sCP=CP+G sCURS 

ORI 4,1 spRINTC7,03USING"««»,H»B";CP;sGOSU 
B5010 : IFCP> *200000THEN54?0 
5460 G0T05610 

5470 CURSORI.23SPR1NTC7,03" Il b 

anco e' saltato! ";3GOSUB5000 :G0 

SUB5030 sCURSOR1,23:PR1NT[7,03" No 

n posso piu' pa3arti " ; SGOSUB5000 

SGOSUB5030SCURSOR1,23SPRINTC7,03" Per 
un'altra partita premi <CR> "SGOTO540 
0 

5480 IFPCO7.5THENCIJRS0R2,2 s PRIN T C 0.6 3" 


Il mio punte99ios "J1NTCPC3 » : IFPC-INTCP 
C3-.5THENPRINTC0.63" e HE220"s1FPC=.5THE 
NCURS0R23,2 SPRINT[0,63"MEZZO 
5490 IFPG07, 5THENCURS0R2, 22 SPRINT [0, 63 " 
Il tuo punte 99 ios ";INTCPG3!sIFPG-INTC 
PG3-.5THENPRINTC0.63" e HE220":1FPG=.5TH 
ENCURS0R23,22 :PRIN T C 0,6 3"HE 2 20 ”sRETU 

RN 

5500 H-RNOC13SRETURN 

5510 IFPC-7.5THENGOSUB5360SGOTO5370 

5520 IFPC=.5THEN5590 

5530 IFCPC-73*(PG<7.53 THEN5430 

5540 IFCPC“6.53 *CPG<7.53*(PG-P1<=63THEN5 

430 

5550 IFCPC=63*CPG<7.53*(PG-PI<63THEN5430 
5560 GOSUB5500 sIF C PC"5.5 3 *lPG <7.5 3 * t PG-P 
1<5.53*(H<.23THEN5430 

5570 IFCPC=5)*(PG<7.53XPG-P1 <53*(H>.23T 
HEN5430 

5580 IFCPG<7.53*CPG-P1<PC)*(H<.253THEN54 
30 

5590 RETURN 

5600 X=K sGOSUBS100 :GOSUB5080:PC=PC-*ACW3s 
A#CW3“""SRETURN 

5610 GOSUB5030 sCURSORI,23 SPRINTI?,03"Pre 
mi un tasto "5 

5620 GET2* sIF2* = “"THEN5620 

5630 GOSUB5640SGOTO170 

5640 CURSOR8.24spRINTC0.63" Carta <C> 

Sto <S> SRETURN 

5650 CURS0R9,24 SPRINTI 6,23"Caria"JSRETUR 

N 

5660 CURS0R24,24 sPRINTC6,23"Sto";:RETURN 

5670 IFACU3=0THENH=1 

5680 IF C H=13 * C PC=0 3 THEN5860 

5690 IFCH=13*CPC = ?J*CK=83THENPC=7.5sB=0: 

GOSUB5880 SGOSUB5360 sGOTOI120 

5700 IFCn=13*CPC“73*CK>83THENPC=7.5sGOSU 

B5880 SGOSUB5360 sGOTOI120 

5710 IFCn = 13*CPC=.53THENPC=7.5 s8=0 sGOSUB 

5880 SGOSUB5360 sGOTOI120 

5720 IFCn=13*CPC-INT(PC3 = 03THENPC=? sGOTO 
1110 

5730 IFCf1=l 3*CPC-INTCPC3*. 53THENPC=7. 5 :G 

OSUB5880 SGOSUB5360 sGOTO1120 

5740 IFPC>7.5THENCURSOR2,2:PRINIC0, 63“ 

HO SBALLATO! "SGOSUB5880SGOTO5450 
5750 IFCPC=7.53*(K»83THENB-0 
5760 I FPC=7.5THENGOSUB5880 :GOSIJB5360 sGOT 
01120 

5770 IF(PC=73+CPC=6.53+CPC=63THEN1110 
5780 GOSUB5500 sIF(PC"5.53*(H<.253THEN1 1 1 
0 

5790 IFCPC*53*CH>.253THEN1110 
5800 IFCPC-4.53*(H<.63THEN1 1 10 
5810 IFCPC=43*(H<.43THEN1110 
5820 IF(PC*3.53*(H<.33THEN1110 
5830 IFCPC=33*(H<.23THEN1110 
5840 IFPC".5THEN5860 
5850 IFCPC<33*CH<.153THEN1110 
5860 RETURN 

5870 CURSOR2.22sPRINTC0.63" SETTE e f1E2 
20 "i:GOSUB5010 s RE TURN 

5880 CURSORI,4SPRINTC,73" "sPRINTCC 

1,? 3 TAB C13" " ;A1* "IBI*;" ":F0RS=1T03 

SPRINTI,73TABU 3" "SNEXTSsPRINTCCÌ, 

7 3 T AB113" " IBI * I" ";A1*;" "SPRINTI,73TA 
B C13" "SRETURN 

5890 IFACU3=0THENn=1 

5900 IFPG>7.5THENCURS0R2,22 sPRINT C 0,63" 
HAI SBALLATO! "SGOSUB5880SGOTO5370 
5910 IFCH=13*CPG»73THENPG«7.5 ■ GOSUB5870 s 
GOSUB5880 SGOTO5450 

5920 IFPG=7.5THENGOSUB5870IGOSUB5880:G0T 
05450 

5930 RETURN 


78 


LIST 10/11 










MUSICA-DIDATTICA 



SPECTRUM 


ACCORDI PER CHITARRA 


Semplici ma fondamentale nozioni 
per cominciare a suonare la chitarra 




FACILE 



Tempo 
di esecuzione 

2 ORE 


vete sotto mano uno 
SPECTRUM ed una 
chitarra che non sape¬ 
te suonare? 

Se rispondete di si allora 
questo programma fa pro¬ 
prio al caso vostro. 

Infatti esso è dedicato a tutti 
quelli che «masticano» già 
un po' di informatica ed 
hanno voglia di imparare le 
prime semplici ma fonda- 
mentali nozioni per comin¬ 
ciare a suonare la chitarra. 
Per chi non ha nemmeno la 
più pallida idea di come sia 
fatto questo strumento e co¬ 
me lo si debba tenere, indi¬ 
chiamo di seguito alcune im¬ 
portanti cose da tenere sem¬ 
pre presenti. 

La chitarra si impugna nor¬ 
malmente tenendo la mano 
sinistra parallela al manico 
e con il pollice che spinge 
dietro la tastiera, al suo cen¬ 
tro, senza tuttavia mai strin¬ 
gerlo intorno. 

Le corde devono essere pre¬ 
mute tra due barrete conse¬ 
cutive, con la punta delle al¬ 
tre quattro dita perpendico¬ 
lari alla tastiera o come suol 
dirsi a «martelletto». 

Le dita della mano destra 
devono pizzicare le corde 
all’altezza del foro della cas¬ 
sa armonica. 

La chitarra deve essere ap¬ 
poggiata con l’incavo della 
cassa sulla gamba sinistra 


accavallata sulla destra e la 
paletta deve trovarsi più o 
meno all’altezza delia spalla 
sinistra. 

Lo spazio tra due barrete 
consecutive si chiama tasto 
e la prima barreta vicino alla 
paletta, capotasto. 

Le sei corde devono essere 
accordate in ordine crescen¬ 
te dalla corda più spessa al¬ 
la più sottile secondo il se¬ 
guente schema: 

I corda - MI basso 

II corda - LA 

III corda - RE 

IV corda - SOL 

V corda - SI 

VI corda - MI cantino 

È importante che vi ricordia¬ 
te che il programma propo¬ 
sto visualizza la tastiera del¬ 
la chitarra come se la steste 
guardando dall’alto con la 
cassa rivolta verso destra. 

A questo punto alcune no¬ 
zioni di teoria musicale. 
Sicuramente tutti saprete 
che le note fondamentali so¬ 
no sette e cioè DO, RE, MI, 
FA, SOL, LA, SI. 

Oltre ad esse ve ne sono al¬ 
tre cinque (i tasti neri del 
pianoforte per intenderci), 
cosicché in totale le note so¬ 
no dodici. Il passare da una 
nota ad una altra consecuti¬ 
va si dice alzarla di un semi¬ 
tono o mezzo-tono: cosi, ad 
esempio, alzando di un se¬ 
mitono il DO si ottiene il DO 


diesis, se invece lo si abbas¬ 
sa di un semitono si ha il DO 
bemolle o SI. 

L’insieme di dodici semitoni 
consecutivi si chiama OTTA¬ 
VA e prima e dopo di essa si 
ritrovano le stesse note con 


tono più grave o acuto a se¬ 
conda dei casi. 

Un accordo è composto da 
tre o più note principali e da 
ripetizioni delle stesse in al¬ 
tre ottave. 

Prendendo il caso dell'ac- 


STRUTTURA DEL PROGRAMMA 

10-75 

Inizio e richiesta istruzioni 

100-175 

Presentazione ed istruzioni 

300-470 

Accordatura 

485-570 

Menù 

985-1080 

Accordi maggiori 

1985-2090 

Accordi minori 

2985-3100 

Accordi di settimana 

4000-4270 

Disegno cerchietti sulla tastiera 

500-5037 

Richiesta ascolto accordo selezionato 

5080-5360 

Suono note accordi e corde a vuoto per 
accordatura 

6000-6060 

Posizionamento numero dito che deve 
premere la corda 

7000-7040 

Visualizzazione numero dito nella posizio¬ 
ne determinata dalle routine 6000-6060 

8000-8260 

Visualizzazione nome accordo selezionato 

8500-8770 

Serie di richiami a routine per la visualiz¬ 
zazione ed ascolto dei singoli accordi cia¬ 
scuno cosi strutturato: 
cancellazione schermo, disegno tastiera, 
scritta nome accordo, posizionamento 
cerchietti e numeri dita, richiesta ascolto, 
salto alle routine che suonano le note del¬ 
l’accordo, ritorno. 

8990-9150 

Disegno tastiera 

9500-9520 

Richiesta tasto 
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7V SPECTRUM 

ACCORDI PER CHITARRA 


cordo di DO maggiore, esso 
è formato da tre note princi¬ 
pali e cioè DO (prima), MI 
(terza), SOL (quinta) e per 
esempio da un DO successi¬ 
vo. 

Se si vuole l’accordo di DO 
settima, si deve aggiungere 
a DO, MI, SOL e anche la 
settima abbassata di un se¬ 
mitono e cioè il SI bemolle. 
Infine nel caso del DO mino¬ 


re, si deve abbassare di 
mezzo-tono la terza e cioè si 
deve sostituire il MI con il MI 
bemolle. 

Il programma prevede una 
comodissima routine per 
l’accordatura della vostra 
chitarra. È molto importante 
effettuare una buona accor¬ 
datura dello strumento sia 
per evitare di ascoltare solo 
«orribili suonacci», sia per¬ 


ché ciò serve molto ad affi¬ 
nare il cosiddetto «orecchio» 
musicale. 

Gli accordi vengono visua¬ 
lizzati con dei cerchietti che 
indicano le corde ed i tasti 
che devono essere premuti 
dalle dita della mano sini¬ 
stra sulla tastiera ed in cor¬ 
rispondenza ad essi, sulla 
destra del disegno, è indi¬ 
cata attraverso dei numerila 


di-teggiatura corrisponden¬ 
te. 

Spesso accade che lo stesso 
numero appaia accanto a 
corde diverse ed anche non 
vicine: ciò significa che quel 
dito deve premere tutte le 
corde sul tasto corrispon¬ 
dente nelle vicinanze della 
barretta più prossima alla 
cassa o come si dice in ger¬ 
go musicale a «barrè». 


1 

2 

REM 

REM 

tttt 
tt tt 

3 

4- 

5 

6 
7 

REM 

REM 

REM 

REM 

REM 

tttt 

tttt 

tttt 

tttt 

tttt 

6 

REM 

tttt 

9 

REM 

tttt 

10 

CLS 

: 1 

1 ;"FERMA 

IL 

200 



15 

CLS 

: 1 

20 

PRINT 1 
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CHITflRRfi 


ZX-SPECTRUM 


R O M R 
PRINT RT 11,5; 


tt» 
tttt 
tttt 
tt» 
tttt 
no 

)CCI tttt 
tttt 
08 

FLASH 

PAUSE 


CO SUB 9000 
RT 15,0;"Uuoi vedere 
Le istruzioni 7 " : PAUSE 0 

•30 IF CHR$ PEEK 23556*"N" THEN 

GO TO 50 

4.0 IF CHR* PEEK 23556 = "S" THEN 

GO TO 100 

4-5 IF CHR* PEEK 23556<>”N" OR 

CHR* PEEK 23556< >"S" THEN GO TO 
20 


50 PRINT RT 17,0;"Vuo 
re La chitarra 7": PRUS 
50 IF CHR* PEEK 23556 

GO TO 500 

70 IF CHR* PEEK 23556 

GO TO 300 

75 IF CHR* PEEK 23556 

PEEK 23556 < >"S" TH 


accorda 

0 

"N" THEN 
"S" THEN 


CHR* 

50 
100 
101 
102 
105 
SUB 
110 
fianco 
a sullo 


REM 
REM 
REM 

BORDER 6 : PAPER 6 

9000 

PRINT INK l;RT 12 

della tastiera 
schermo vedrai 


< > " N ” 

EN GO 


CLS 


OR 

TO 


GO 


.Essi rappresentano Le 
La mano sinistra numer 
sto modo:" 

115 PRINT INK 2;RT 1S, 

dice 


0;"N.B. R 
di-s e g n a t 
dei nume ri 
di-ta del 
ati in q. u e 


© ; 


dio 
u L a r 
g n o L 
120 
125 
SUB 
130 
e g u i 
tura 
e Le 
r r e 

U 

vi e 
L L i C 
e t a m 
135 
14-0 
SUB 
14.5 
L ma 
a t o 
i L 


e 

o " 

GO SUB 
CLS 
9000 
PR INT 
con a t 
, essa 
p o s i z i 
Le dita 
n u Ltim 
segui re 
e d e L L a 
ente di 
GO SUB 
CLS 
9000 
PR INT 
ni c o de 
a L c o n t 

MI c a n t 


1 - 
2 = 


9500 

BORDER 6 : 

INK 1;RT 
tenzione 
ti aiut 
o ni piu' 
s u L L a t a 
o a c c o r g 
e ' d i p 
mano sin 
e t r o La t 
9500 

BORDER 6: 

INK 1;RT 
lla chita 
r a rio , ne 
ino si t r 


PAPER 6 


i n 
m e 


a n 
m i 


GO 


12,0;" S 
La di-teggia 
era' atrovar 
comodeper po 

stiera. 

imento chede 
ortare iLpo 
istra com-pL 
astierà" 


PAPER 6 


GO 


150 PRINT 

12 3 


12,0;"N.B. I 
rra e'disegn 
L sen-so che 
ova inatto. 

Quindi 

0 ; "corde 


INK 2;RT 1S 

4-5 6 

note 

RE LA MI" 

INK 2,RT 1,29;"MI”;RT 

RT 4- , 29; "SOL" ; RT 6,29 
29;"LA";AT 9,29;"MI" 


MI SI SOL 
155 PRINT 
3,29;"SI" 

; "RE" ; RT 8 , 1_ 

160 GO SUB 9500 
165 CLS BORDER 6: PAPER 6: GO 

SUB 9000: PRINT RT 13,10; INK 2 

; BRIGHT li"SEI PRONTO 7": PAUSE 
100: PRINT RT 17,1; INK 1;"Pren 

di in mano La chitarra e...": BE 
EP .5,0: BEEP .1,12: BEEP .1,13: 
BEEP .1,14-: PAUSE 200: PRINT RT 
19,9; FLASH 1; INK 1; "SI COMINC 
IR!!!": FOR a=0 TO 5: BEEP . 1 , a : 


NEXT a: BEEP 2,0 

170 PRINT «0; PAPER 5;"Uuoi acc 

ondare La chitarra 7": PAUSE 0 

175 IF CHR* PEEK 235S6="N" THEN 
GO TO 500 . 

300 REM 
REM 
REM 

CLS GO SUB 9000 

PRINT INK 2;RT 1,29;"MI": P 

INK 1;RT 17,0;"Accordiamo i 


301 

302 
310 
320 

R INT 
L MI 
325 GO SUB 4-70 

330 LET S=l: GO SUB 5110 
335 IF INKEY*~"h" OR INKEY* 
THEN GO TO 34-5 
34-0 GO TO 330 

34-5 PRINT INK 2; RT 3,29; "SI 
RINT INK 1;RT 17,0,"Rccordia 
L SI" 

350 GO SUB 4-70 
355 GO SUB 5160 

360 IF INK EY * = 11 h" OR INKEY* 
THEN GO TO 370 
365 GO TO 34-5 


i"H" 


.. . p 

m O i 


"HV 


29;"SOL 
c c o r d i a f 


370 PRINT INK 2 ; RT 4-, 

PRINT INK 1;RT 17,0;"R 
iL SOL" 

375 GO SUB 4-70 
360 GO SUB 5200 

365 IF INKEV*="h" OR INKEY* 
THEN GO TO 395 
390 GO TO 360 


L RE " 

4-00 GO SUB 4-70 
4-05 GO SUB 5260 


"H" 


THEN GO TO 4-20 
4-15 GO TO 4-05 


L LA " 

4-25 GO SUB 4-70 
4-30 GO SUB 5310 


THEN GO TO 4-4-5 
4-4-0 GO TO 4-30 
4-4-5 PRINT INK 2 
RINT INK 1 ; RT 17 
L MI" 

4-50 GO SUB 4-70 
4.55 GO SUB 5360 
4-60 IF INKEY * = " 

THEN GO SUB 950 
4-65 GO TO 4-55 

4-70 PRINT INK 0 ; RT 19,0; "Qua 
Lo hai accordato premi 'H": 
URN 


RT 

0 ; 

6,29;' "RE" : P 

"Accordiamo i 

" 

OR 

INK EY * = "H" 

RT 

0 ; 

8,29;"LA": P 
"Accordiamo i 

•• 

OR 

INKEY * = " H " 

RT 

9 

,29;"MI": P 

0 ; 

"Accordiamo 1 

1 : 

OR 

GO 

INKEY*="H" 

TO 500 


4-65 

4-90 

4.95 

500 

SUB 


REM 

REM _ 

REM 

BORDER 
9000 


6: PAPER 6 


CLS 


n d O 
RET 


GO 


5 10 

PR INT 

INK 

1 ; 

RT 

12 , 0 ; 

"ScegLi 

L 'opzione : 

•• * ' * 

■ 

accordi 

maggio 

r 1 




2 > 



minori 





3) 


** 

di set 

t i m a 




4- ) 

STOP" 


520 

LET 

r * 

= INKEY * 



530 

IF 

r * < 

.. ± .. 

OR 

r * > " 4- " THEN GO 

TO ! 

520 







54-0 

IF 

r * = 

" 1 " 

THEN 

GO TO 

1000 

550 

IF 

r * = 

" 2 ” 

THEN 

GO TO 

2000 

560 

IF 

r * = 

"3" 

THEN 

GO TO 

3000 

570 

IF 

r * = 

•• 4 . •• 

THEN 

STOP 



985 

990 


REM 

REM 


995 REM 

1000 CLS BORDER 6 : PAPER 6 : GO 

SUB 9000: PRINT INK 1;RT 15,0;" 

Premi E NT ER per i l menu'" 

1001 PRINT RT 0 , 8 ; INUERSE 1; BR 


80 
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IGNT 1;"ACCORDI HhGGIORI" 

1002 input "Qua le accordo vuoi ' 
edere? "; LINE a $ 

1005 IP a * = •••• THEN GO TO 500 
1010 IF aj="dO" OR at="DO" THEN 
GO TO 3510 

1020 IF a*="re" OR a*="RE" THEN 


GO TO 
1030 
GO TO 
104-0 
GO TO 
1050 
N GO 
1060 
GO TO 
1070 
GO TO 
1030 
1935 
1993 
1995 
2000 
SUB 
Premi 
2002 
IGHT 
2005 
edere 

2010 
2020 
GO TO 
2030 
GO TO 
204.0 
GO TO 
2050 
GO TO 
2060 
N GO 
2070 
GO TO 
2060 
GO TO 
2090 
2985 
2990 
2995 
3000 
SUB 
Premi 


3520 

IF a * = " m i ** 

3530 

IF a*="fa" 

354-0 

IF a * = " s o L 
TO 8550 
IF a * = •' La" 

3560 

IF a * = " s i " 

3570 

GO SUB 7500 
REM 
REM 
REM 

CL5 : BORDER 6 : PAPER 6 : GO 

9000: PRINT INK 1;AT 15,0;" 

ENTER per il menu'" 

PRINT RT 0,9.; INUERSE 1; BR 
1;"ACCORDI MINORI 
INPUT 
? " ; i 


OR a *s"MI" THEN 
OR a*="FA" THEN 
OR a $ = " SOL " THI 
OR a*="LA" THEN 
OR a*»"SI" THEN 
GO TO 1002 


Qu a 
NE 

l e 

a * 

accordo 

vuoi V 

" THEN 

GO TO 500 

d O ‘ 

OR 

a * = "DO" 

THEN 

re" 

OR 

a * = "RE" 

THEN 

mi" 

OR 

a * =* " M I " 

THEN 

fa" 

OR 

a * = "FA" 

THEN 

sol 

i 

" OR a * = "SOL" THE 

la" 

OR 

a *«"LA" 

THEN 

si" 

OR 

a J*"SI" 

THEN 


IF a « 

IF a * 

36 10 
IF a « 

8620 
IF a * 

3630 
IF a » 

364.0 
IF a * 

TO 8650 
IF a * = 

3660 
IF a * = 

3670 

GO SUB 7500 
REM 
REM 
REM 

CL5 : BOROER 6 : 

9000: PRINT INK 

ENTER per il m 


GO TO 2005 


PRPER 6 : GO 
l; RT 15,0; " 
: nu ' " 

3005 PRINT RT 0,7; INUERSE 1, BR 
IGHT 1;"RCCORDI DI SETTIMA" 

3010 INPUT "Quale accordo vuoi v 
edere? " ; L INE a * 

3020 IF a * = "" — ‘ 

3030 IF a * = "d o 
GO TO 8710 
304.Q if a * = " re 
GO TO 8720 
3050 IF a $ = "mi 
GO TO 8730 
3060 IF a * = " fa 
GO TO 374.0 
3070 IF a * = "so l " 

N GO TO 8750 
3080 IF a * = " l a " 

GO TO 8760 
3090 IF a * = "S i " 

GO TO 3770 
3100 GO SUB 7500 

4000 REM _ 

4005 REM 


THEN 

GO TO 

500 

" OR 

a * =* " DO 

" THEN 

" OR 

a * = "RE 

" THEN 

" OR 

a(«"MI 

" THEN 

" OR 

a * = "FA 

" THEN 


OR a * = "SOL" THE 
OR a * = " L A " THEN 


OR a * = "SI" THEN 
: GO TO 3010 


4008 

40 10 

URN 

4020 

URN 

4040 

URN 

4050 

URN 

4060 

URN 

4070 

URN 

4030 

URN 

4090 

URN 

4 100 

URN 

4 110 

URN 

4 120 

URN 
4 140 
URN 
4 150 
URN 
4 160 
URN 
4 170 
URN 
4 180 
URN 
4 190 
URN 


REM 
INK 2 : 

REM f 
INK 2 : 

REM f 
INK 2 : 

REM £ 
INK 2 : 

REM d 
INK 2 : 

REM d 
INK 2 : 

REM r 
INK 2 : 

REM s 
INK 2 : 

REM l 
INK 2 : 

REM l 
INK 2 : 

REM r 
INK 2 : 

REM m 
INK 2 : 

REM f 
INK 2 : 

REM l 
INK 2 : 

REM S 
INK 2 : 

REM d 
INK 2 : 

REM f 
INK 2 : 

REM f 


CIRCLE 
a 1 cord 

CIRCLE 
a « 1 cor 

CIRCLE 

o I 1 c o r 

CIRCLE 
o 2 cord 

CIRCLE 
o » 2 c o r 

CIRCLE 
e 2 cord 

CIRCLE 
ol» 3 co 

CIRCLE 
a 3 cord 

CIRCLE 
a » 3 cor 

CIRCLE 

e » 4 cor 

CIRCLE 


14. , 
a 

35 , 
d a 
62 , 
d a 
14 , 
a 

35 , 
d a 
62 , 
a 

14- , 
r d a 
35 , 
a 

62 , 
d a 

14 , 
d a 

35 , 


a 4 corda 

CIRCLE 14 
a» S corda 

CIRCLE 35 
i 5 corda 

CIRCLE 62 
o 5 corda 

CIRCLE 14 
a 6 corda 

CIRCLE 35 
a « 6 corda 


160,3 : 

RET 

160,3 : 

RET 

160,3 : 

RET 

146,3 : 

RET 

148,3 : 

RET 

148,3 : 

RET 

136,3 : 

RET 

136,3 : 

RET 

136,3 : 

RET 

124,3 : 

RET 

124,3 : 

RET 

124,3 : 

RET 

112,3: 

RET 

112,3: 

RET 

112,3: 

RET 

100 ,3 : 

RET 

100 ,3 : 

RÉT 


INK 2: CIRCLE 62,100,3: RET 

REM sol 6 corda 

INK 2: CIRCLE 88,148,3: RET 

REM re» 2 corda 

INK 2: CIRCLE 88,136,3- RET 

REM £i 3 corda 
INK 2: CIRCLE 112,124,3: RE 

REM £ o l 4 corda 

INK 2: CIRCLE 112,136,3 


4200 
URN 
42 10 
URN 
4230 
URN 
4240 
TURN 
4250 

TURN 
4260 
URN 
4270 
TURN 
5000 
5005 
5003 
50 10 
re l 
50 15 
GO ' 

50 16 
50 17 
5020 
re l 

5025 
GO TO 2000 

5026 LET £ = 

5027 RETURN 
5 0 3 0 P RINT 
re l'accord 


RE 


REM 
INK 2 : 

REM f 
INK 2 : 

REM 
REM 
REM 
REM 
PRINT 
a c c o r d 
IF CHR 
O 1000 
LET S = 
RETURN 
PR INT 
a c c o r d 
IF CHR 


do» 3 corda 
CIRCLE 83,124,3: 
a « 4 corda 

CIRCLE 112,112,3: 
re 5 corda 


RET 

RE 


RT 17,0; "Uu oi ascolta 
o? (s/n)": PAUSE 0 

* PEEK 2 3 5 5 6 = " N " THEN 


RT 17,0;"Uuoi ascolta 
o? (s/n)": PRUSE 0 

* PEEK 23556x"N" THEN 


RT 
O ? 


17,0;"Uuoi ascolta 
( s/n) " : PRUSE 0 


5035 
GO - 

5036 

5037 
5080 
5090 
5 100 
5 110 
5120 
5 130 
5 140 
5 150 
5 160 
5 170 
5 180 
5 190 
5200 

52 10 
5230 
5240 
5250 
5260 

5270 

5230 

5290 

5300 

53 10 
5320 
» 

5330 
5340 
5350 
5360 
6000 
6005 
6003 
60 10 
N 

6020 

N 

6030 

N 

6040 

N 

6050 

N 

6060 

N 


IF CHR* 
O 3000 
LET S =1 
RETURN 


PEEK 2 3S5 6 »"N" THEN 


BEEP 

* 

,• 

19 

RETURN 

REM 

sol 

BEEP 

S 


13 

RETURN 

REM 

fa» 

BEEP 

s 


17 

RETURN 

REM 

f a 

BEEP 

s 


16 

RETURN 

REM 

m i 

BEEP 

s 


15 

RETURN 

REM 

re» 

BEEP 

s 


14 

RETURN 

REM 

r e 

BEEP 

5 


13 

RETURN 

REM 

do» 

BEEP 

s 


12 

RETURN 

REM 

d o 

BEEP 

BEEP 

s 


11 
10 

RETURN 

REM 

s i 

s 

> 

RETURN 

REM 

la» 

BEEP 

s 


9 


RETURN : 

REM 

l a 

BEEP 

s 


8 


RETURN : 

REM 

sol» 

BEEP 

s 


7 


RETURN 

REM 

sol 

BEEP 

s 


6 


RETURN : 

REM 

fa» 

BEEP 

= 


5 


RETURN 

REM 

f a 

BEEP 

s 


4 


RETURN 

REM 

m i 

BEEP 

s 


3 


RETURN 

REM 

re» 

BEEP 

s 

/ 

2 


RETURN 

REM 

r e 

BEEP 

s 


1 


RETURN 

REM 

do » 

BEEP 

s 

/ 

0 


RETURN 

REM 

d o 

BEEP 

s 




RETURN 

REM 

S i 

BEEP 

s 

/ 



RETURN 

REM 

la» 

BEEP 

s 



3 

RETURN 

REM 

l a 

BEEP 

s 


-4 

RETURN 

REM 

sol 

BEEP 

s 


_ 1 


RETURN 

REM 

sol 

BEEP 

3 

/ 

— 


RETURN 

REM 

fa» 

BEEP 

s 



' 

RETURN 

REM 

f a 

BEEP 

s 

/ 

-8 

RETURN 

REM 

m i 


REM 

REM 

REM 


PRINT 

INK 

2; RT 

1,29 ; : 

RETUR 

PRINT 

INK 

2 ; RT 

3,29;: 

RETUR 

PRINT 

INK 

2; RT 

4 , 29 ; : 

RETUR 

P R I NT 

INK 

2 ; RT 

6,29 ; : 

RETUR 

PRINT 

INK 

2; RT 

8,29;: 

RETUR 

PR INT 

INK 

2; RT 

9,29;: 

RETUR 


7000 

R E M 



7005 




7003 

REM 



70 10 

PRINT 1 

RETURN 


7020 

PRINT 2 

RETURN 


7030 

PRINT 3 

RETI IRN 


7040 

P RINT 4 

RETURN 


7500 

IF a * : > 

"do" OR 

a * < > 

a * < > 

"re" or 

a * : >"RE" 

OR 

OR 

a * < > " M I " 

OR a * < > 

" fa" 

"FA" 

OR a * <: > 

"sol" OR 

a * < 


"DO" OR 
a * < > " m i " 
OR a * < > 
_ . . _ _ >"SOL" O 

R a * < >" la" OR a * < >"LR" OR a«<>"s 
i" OR a * <: > " S ± ■ ‘ THEN RETURN 
3000 PRINT RT 0,10; INUERSE 1; B 

RIGHT 1,"DO MAGGIORE": RETURN 
3 0 10 P RINT RT 0,10; 


RIGHT 1,"RE MAGGIORE" 


INUERSE 1, B 


RETURN 


8020 PRINT RT 0,10; INUERSE 1; B 


RIGHT 1 
3030 PR 
RIGHT 1 
3040 PR 
IGHT 1; 
3050 PR 
RIGHT 1 
8060 PR 
RIGHT 1 
3100 PR 
RIGHT 1 


; "MI 
INT 
; "FA 
INT 
" SOL 
INT 
; "LR 
INT 
; "SI 
INT 
; "DO 


MRGGIOR 
RT 0,10; 

MAGGIOR 
RT 0,9; 

MAGGIOR 
RT 0,10; 

MRGGIOR 
RT 0,10; 

MRGGIOR 
RT 0,11; 
MINORE" 


E": RETURN 

INUERSE l; B 

E": RETURN 
INUERSE l; BR 
E": RETURN 

INUERSE 1; B 

E": RETURN 
INUERSE 1; B 

E": RETURN 

INUERSE 1; B 

RETURN 
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8U0 PR 
RXGHT 1 
8120 PR 
RXGHT 1 
S130 PR 
RXGHT 1 
3140 PR 
RXGHT 1 
8150 PR 
RXGHT 1 
8160 PR 


INT HT 
; ••RE M 
INT RT 
; "HI M 
INT RT 
"Ffi M 
INT RT 
; "SOL 
INT RT 
, "Lfl M 
INT RT 


0,11 
INOPE 
0,11 
INORE 
0.11 
INOPE 
0,10 
r-1 INORI 
0,11 
INOPE 
0,11 


i; 


INUERSE 
RETURN 
INVERSE 
RETURN 
INVERSE 
RETURN 
INVERSE 
RETURN 
INVERSE 1; 

RETURN 
INVERSE 1; 


i ; 
i ; 
i; 


R IGHT 
8200 
R IGHT 
SS 10 
R IGHT 
SSS0 
R IGHT 
8230 
R IGHT 
8240 
RIGHT 
8250 
RIGHT 
8260 
R IGHT 
S 5 0 0 
8505 
3503 
35 10 
000 : 

O SUB 
6050 : 


1,"SI MINORE" 
PRINT RT 0,11; 

1 ; '• DO SETT IMA ' 
PR INT RT O , 1 1 ; 

1;"RE SETT IMR' 
PR INT RT 0,1 1 ; 

1; "MI SETTIMA' 
PR INT 
1 ; •• FR 


RETURN 
INVERSE 1; 

RETURN 
INVERSE l; 

RETURN 
INVERSE 1, 
RETURN 
INVERSE 1, 
RETURN 
INVERSE 1, 
l;"SOL SETTIMA": RETURN 
PRINT RT 0,11; INVERSE 1, 
1 ; "LA SETTIMA' 

P R I NT RT 0,1 1 ; 

1;"SI SETTIMA 


RT 

0 , 

il; 



‘ IMA 

RT 

"0 , 

, 10 : 


RETURN 
IMMERSE 1; 
RETURN 


r-t.MnH-t-w- 


REM 
REM 
REM 

CLS GO SUB 9000: GO SUB 
GO SUB 60S0 GO SUB 7010: 
6040 : GO SUB 7020 GO SUB 
GO SUB 7030: GO SUB 0-050: 


GO SUB 4120 GO SUB 4170: GO SUB 

5000 : GO SUB 5350 : GO SUB 5280 : 
GO SUB 5240 : GO SUB 5200 : GO SU 
B 5150: GO SUB 5110: GO SUB 2500 
GO TO 1000 

3512 REM 
35 15 REM 

3513 REM 

3520 Cl_S : GO SUB 2000 : GO SUB 3 

010: GO SUB 5030: GO SUB 7010: G 
O SUB 6010: GO SUB 7020: GO SUB 
6020 : GO SUB 7030 : GO SUB 4-020 : 
GO -SUB 4-070: GO SUB 4-020: GO SUB 

5000: GO SUB 5360: GO SUB 5310: 

GO SUB 5260: GO SUB 5160: GO SU 
B 5130: GO SUB 5020: GO SUB 2500 
: GO TO 1000 
3522 REM 

352 5 REM tì»T7Ffc Ke H-H< 

8523 REM 

8530 Cl_S : GO SUB 2000 : GO SUB 3 

020: GO SUB 6030: GO SUB 7010: G 


O SUB 6050 : GO SUB 7020 : GO 

6040 : GO SUB 7030 : GO SUB 4- 

GO SUB 4-160: GO SUB 4-120: G 

5000 : GO SUB 5360 GO SUB 

GO SUB 524-0: GO SUB 5120: 

B 5160: GO SUB 5110 GO SUB 

GO TO 1000 

3534- REM 

35 35 REM Ifi 19- 1^ l- ItTJl 

3S36 REM 

354-0 CLS •: GO SUB 2000 : GO 
O30 : GO SUB 6060 : GO SUB 70 

O SUB 6050 : GO SUB 7030 GO 

604-0 : GO SUB 704-0 : GO SUB 6 

GO SUB 7020 : GO SUB 6020 : G 

70 10: GO SUB 60 IO: GO SUB 

GO SUB 4-010: GO SUB 4-050: 

B 4-020: GO SUB 4-170: GO SUB 

GO SUB 4-130: GO SUB 5000: 

UB 5350: GO SUB 5280: GO SU 

0: GO SUB 5130: GO SUB 5150 

SUB 5100: GO SUB 2500: GO T 


SUB 
060 : 

O SUB 
5220 : 
GO SU 
2500 


SUB 3 
10 : G 
SUE: 
030 : 

O SUB 
70 10 : 
GO SU 
4-14-0 
GO S 
B 523 
GO 

O 100 


0 

354-4- REM 
354-5 REM 
354-6 REM 

3550 CLS GO SUB 2000 : GO SUB 8 

04-0: GO SUB 6050: GO SUB 7010: G 

O SUB 6060 : GO SUB 7020 GO SUB 

6010 GO SUB 704-0: GO SUB 4-04-0: 

GO SUB 4-200: GO SUB 4-160: GO SUB 
5000: GO SUB 5330 GO SUB 5220: 

GO SUB 5260 : GO SUB 5200 : GO SU 

B 5160: GO SUB 5110: GO SUB 2500 

GO TO 1000 

3554- REM 

3555 REM 

3556 REM 

3560 CLS GO SUB 2000 GO SUB 3 

050: GO SUB 604-0: GO SUB 7010: G 

O SUB 6030 : GO SUB 7020 : GO SUB 

6020 GO SUB 7030 GO SUB 4-060 : 

GO SUB 4-020: GO SUB 4-120: GO SUB 
5000: GO SUB 5360: GO SUB 5310: 

GO SUB 524-0: GO SUB 5130: GO SU 

B 514-0: GO SUB 5110: GO SUB 2500 

GO TO 1000 

3564- REM 

3565 REM rfUI- L- CHE 

3566 REM 

3570 CLS : GO SUB 2000 : GO SUB 3 

GO SUB 6010: GO SUB 7010: G 


6030: GO SUB 7030: VU SUB 6020; 

GO SUB 704-0: GO SUB 4-020: GO SUB 
4-2 10: GO SUB 4-260 GO SUB 4-230 
GO SUB 5000: GO SUB S360: GO SU 
B 5310: GO SUB 5210: GO SUB 5160 
GO SUB 5120: GO SUB 5020: GO S 
UB 2500 : GO TO 1000 
3600 REM 
3605 REM 
3603 REM 
3610 CLS 
100 : GO SUB 

O SUB 6020 : 


GO SUB 2000 : GO SUB 
6010: GO SUB 7010: 

GO SUB 7020 GO SUB 


604-0: GO SUB 7030: GO SUB 6030: 

GO SUB 704-0 : GO SUB 4-04-0 : GO SUB 
4-210: GO SUB 4-24-0: GO SUB 4-250: 
GO SUB S020: GO SUB 5360: GO SU 
B 5310: GO SUB 5200: GO SUB 5150 
GO SUB 5120: GO SUB 5060: GO S 
UB 2500 : GO TO 2000 
3614- REM 

3615 REM 

3616 REM 

3620 CLS GO SUB 2000 GO SUB 8 
110: GO SUB 6010: GO SUB 7010: G 
O SUB 6030: GO SUB 7020: GO SUB 

6020: GO SUB 7030: GO -SUB 4-0 10: 

GO SUB 4-020 : GO SUB 4-070 : GO SUB 
5020: GO SUB 5360: GO SUB 5310: 

GO SUB 5260: GO SUB 5130: GO SU 

B 5130: GO SUB 5100: GO SUB 2500 
: GO TO 2000 

362 4 REM 

3626 REM 

3630 CLS : GO SUB 2000: GO SUB 3 

120 : GO SUB 6050 : GO SUB 7030 : G 

O SUB 6040: GO SUB 7040: GO SUB 

4160: GO SUB 4120 GO SUB 5020: 

GO SUB 5360: GO SUB 5220 GO SUB 

5240: GO SUB 5200: GO SUB 5160: 

GO SUB 5110 GO SUB 2500: GO TO 

2000 

3634 REM 

8635 REM 

8636 REM 

3640 CLS GO SUB 2000. GO SUB 3 

130: GO SUB 6010 GO SUB 7010: G 

O SUB 6020 GO SUB 7010 GO SUB 

6030. GO SUB 7010 GO SUB 6060. 

GO SUB 7010: GO SUB 6050 GO SUB 

7030: GO SUB 6040: GO SUB 7040: 

GO SUB 401© GO SUB 4050 GO SU 

B 4030: GO SUB 4130 GO SUB 4170 

GO SUB 4140: GO SUB 5020 GO S 

UB 5350: GO SUB 5230: GO SUB 523 

0: GO SUB 5120: GO SUB 5150: GO 

SUB 5100: GO SUB 2500: GO TO 200 
0 

3644 REM 

3645 REM 

3646 REM 

3650 CLS : GO SUB 2000 : GO SUB 3 

140: GO SUB 6010 GO SUB 7010: G 
O SUB 6020: GO SUB 7010: GO SUB 

6030: GO SUB 7010: GO SUB 6060: 

GO SUB 7010: GO SUB 6050: GO SUB 

7030: GO SUB 6040: GO SUB 7040: 

GO SUB 4040: GO SUB 4070: GO SU 

B 4100: GO SUB 4200: GO SUB 4240 

GO SUB 4270 : GO SUB 5020 : GO S 
UB 5330 : GO SUB 5260 : GO SUB 520 
0: GO SUB 5170: GO SUB 5130: 

SUB 5030 : GO SUB 2500 : GO TO 
0 

3654 REM 

3655 REM 

3656 REM 
3660 CLS 


GO SUB 2000 


GO 

200 


GO SUB 8 


060 
O SUB 6040 


GO SUB 7020 


GO SUB 


150: GO SUB 6020: GO SUB 7010: G 

O SUB 6040 : GO SUB 7020 : GO SUB 

6030 : GO SUB 7030 GO SUB 4050 : 

GO SUB 4020: GO SUB 4120: GO SUB 
5020: GO SUB 5360: GO SUB 5310: 

GO SUB 5240: GO SUB 5180: GO SU 

B 5150: GO SUB 5110: GO SUB 2500 

GO TO 2000 

3664 REM 

3665 REM aHUiFIZl 

3666 REM 

8670 CLS : GO SUB 2000: GO SUB 3 

160: GO SUB 6010: GO SUB 7010: G 

O SUB 6020 : GO SUB 7020 : GO SUB 

6040 : GO SUB 7030 : GO SUB 6030 : 

GO SUB 7040: GO SUB 4020: GO SUB 
4070 : GO SUB 4230 GO SUB 4260 : 
GO SUB 5020 : GO SUB 5360 : GO SU 

B 5310: GO SUB 5210: GO SUB 5160 

: GO SUB 5130: GO SUB 5020: GO S 

UB 2500 : GO TO 2000 
3700 REM 

37 0 5 REM EEBEBI 

3703 REM 

8710 CLS : GO SUB 2000: GO SUB 3 

200: GO SUB 6020: GO SUB 7010: G 

O SUB 6040: GO SUB 7020: GO SUB 

6050 : GO SUB 7030 : GO SUB 6030 : 

GO SUB 7040: GO SUB 4050: GO SUB 
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4-120 : GO SUB 
GO SUB 5030 : 

B 52S0: GO SUB 
GO SUB 5150: 
UB 2500 GO TO 
3714- REM 

6716 REM 
3720 CLS : GO 
210: GO SUB 60 

O SUB 6030 : GO 
6010. GO SUB 7 
GO SUB 4-05O : G 
5030 : GO SUB 
GO SUB 5260 : 


4-170: GO SUB 4-100: 

GO SUB 5360 : GO SU 
524.0 : GO SUB 5200 
GO SUB 5110: GO S 
3000 


SUB 2000 : GO SUB © 
20: GO SUB 7010: G 

SUB 7020 : GO SUB 

030 : GO SUB 4-020 : 

O SUB 4090 : GO SUB 
5360: GO SUB 5310: 

GO SUB 5130: GO SU 

B 5150: GO SUB 5020: GO SUB 2500 

GO TO 3000 

3724- REM 

3725 REM 

3726 REM 

3730 CLS : GO SUB 2000: GO SUB 3 
220: GO SUB 6030: GO SUB 7010: G 

O SUB 6050 : GO SUB 7020 : GO SUB 

604.0: GO SUB 7030: GO SUB 6020: 

GO SUB 7 0 4 0 : G O SUB 4 0 3 0 : GO SUB 
4120: GO SUB 4160: GO SUB 4070: 

GO SUB 5030 : GO SUB 5360 : GO SU 

B 5220: GO SUB 5240: GO SUB 5120 

GO SUB 5130: GO SUB 5110: GO S 
UB 2500 : GO TO 3000 
©734 REM 

3735 

3736 
3740 
230 : 


REM 

REM 

CLS 


GO SUB 


2000 : GO SUB 8 
GO SUB 6010: GO SUB 7010: G 

O SUB 6O20 : GO SUB 7040 : GO SUB 

6060: GO SUB 7010: GO SUB 6030: 

GO SUB 7020 : GO SUB 6050 : GO SUB 
7030 : GO SUB ©040 : GO SUB 7040: 

GO SUB 4010: GO SUB 4130: GO SU 

B 4020: GO SUB 4170: GO SUB 4140 

G O SUB 4 210 : G O SUB 5030: GO S 
UB 5350 : GO SUB 5230 : GO SUB 523 

0: GO SUB 5130: GO SUB 5120: GO 

SUB 5100: GO SUB 2500: GO TO 300 
0 

3744 REM 

3745 REM 
3 7 4 6 RE M 

3750 CLS : GO SUB 2000: GO SUB 3 
240 : GO SUB 6010 : GO SUB 7010 : G 

O SUB 6050 : GO SUB 7020 : GO SUB 

6060: GO SUB 7030: GO SUB 4010: 

GO SUB 4160: GO SUB 4200: GO SUB 

5030 : GO SUB 5330 : GO SUB 5220 : 

GO SUB 5260 : GO SUB 5200 : GO SU 
B 5160: GO SUB 5110: GO SUB 2500 

GO TO 3000 

3754 REM 

3755 REM DEBBI 

8753 REM 

3760 CLS : GO SUB 2000: GO SUB 3 
250: GO SUB 6040 GO SUB 7010: G 

O SUB 6030 : GO SUB 7020 : GO SUB 

6020: GO SUB 7030: GO SUB 6010: 

GO SUB 7040: GO SUB 4120: GO SUB 

4020: GO SUB 4060: GO SUB 4040: 

GO SUB 5030 : GO SUB 5360 : GO SU 
B 5310: GO SUB 5240: GO SUB 5130 

GO -SUB 5140: GO SUB 5030: GO S 

UB 2500: GO TO 3000 

3764 REM _ 

3 7 6 5 REM fWWKkMi 

©766 REM 

S 7 7 0 CLS : GO SUB 2000: GO SUB 3 
260: GO SUB ©040: GO SUB 7010: G 

O SUB ©050 : GO SUB 7020 : GO SUB 

6030: GO SUB 7030: GO SUB ©010: 

GO SUB 7040: GO SUB 4020: GO SUB 

4020: GO SUB 4160: GO SUB 4110 

GO SUB 5030: GO SUB 5360: GO SU 


2020 

2O30 

2040 

205O 


DRflU 

225 , 

0 : 

, 0 : 

DRflU 

0 , 

DRflU 

0 , ©0 


225 

STEP 

25 

DRflU 

0,60 



5130 
GO S 


DRfl 


B 5220 : GO SUB 5250 : GO SUB 
GO SUB 5160: GO SUB 5020: 

UB 2500 : GO TO 3000 
3220 REM 

3222 REM 

2000 PLOT 0,100 

U 0,60: DRflU -225,0: 

2010 FOR 3=0 TO 5 

PLOT a , 100 : 

NEXT a 
FOR a=25 TO 
PLOT a , 100 : 

2060 NEXT a 

2120 FOR 3=100 TO 150 STER 12 

2130 PLOT 0,a: DRflU 225,0 

2140 NEXT 3 

2150 RETURN 

2500 PRINT »0; PARER 5;" 

Premi un tasto ": PAUSE 

0 


2520 RETURN 


BEEP .1,13: BEE 



N.B. R fianco detta tastiera di¬ 
segnata sulto schermo vedrai dei 
numeri.Essi rappresentano Le di¬ 
ta detta mano sinistra n umorati 
in questo modo: 


1 = indice 

2 = medio 

3 = anulare 

4 = mignolo 



Segui con attenzione la 
teggiatura, essa ti aiuter 
trovare Le posizioni piu' co 
per porre te dita sulla tast 


di - 


Un ultimo accorgimento 
devi eseguire e' di portare 
pollice della mano sinistra 
P latamente dietro la tastier 



N.B. Il manico della chita ri- 
disegnato al contrario, nel 
so che il MI cantino si trov 
alto. 

Quindi. 


corde 1 


3 4 5 6 


note 


MI SI SOL RE LA MI 


aaBEHgjaaa 

































_ 
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LA COMETA DI HALLEY 

Come prevedere e calcolare l’apparizione della cometa 
con il computer 


©a 

facile Tempo 

di esecuzione 

3 ORE 


ijjggjj on rammentavamo 
iiHjSi; tanto «rumore» intor- 
nijijj no ad un evento spa¬ 
ziale, qual'è il ritorno della 
cometa di Halley, se non tor¬ 
nando con il pensiero al l’or¬ 
mai epico allunaggio opera¬ 
to dal LEM nel Luglio 1969. 

La storica frase di Neil Arm¬ 
strong: «È un piccolo passo 
per un uomo, ma un grande 
passo per l’umanità!» è ri¬ 
masta scolpita nei nostri 
cuori (o nel fegato come di¬ 
rebbero in Cina) ed ora al- 
l’approssimarsi del passag¬ 
gio della cometa più famosa 
del mondo, si vivifica rievo¬ 
cando nell’occasione il batti¬ 
to aritmico di quei giorni. 

Ma Halley ha certo un qual¬ 
cosa in più da offrirci: qual¬ 
cosa che risiede forse nel 
suo potere inesorabile di 
scandire i tempi stessi della 
nostra esistenza, per cui è 
da considerarsi fortunato, 
nonché longevo, l'uomo che 


possa coscientemente am¬ 
mirarla per ben due volte 
nella propria vita. È quindi 
un appuntamento improro¬ 
gabile quello che ci aspetta, 
se non per condizioni di ago¬ 
rafobia o peggio ancora cau¬ 
sa i vaneggiamenti del me¬ 
nagramo di turno pronto a 
parlarvi dell'apocalisse 
prossima ventura. 

L'appiglio storico di questi 
moderni «flagellanti» risiede 
nella illustre quanto supera¬ 
ta opinione del filosofo gre¬ 
co Aristotele, il quale asseri¬ 
va le comete essere causa 
di particolari fenomeni at¬ 
mosferici, appartenenti al 
mondo sublunare, ovvero 
non facenti parte del «cor¬ 
pus» astronomico. 

Il pensatore ellenico infine 
concludeva: «Cosi, dunque, 
come abbiamo detto, quan¬ 
do le comete appariscono 
più copiose e frequenti, l'an¬ 
nata si manifesta chiara¬ 


mente secca e ventosa». 
Detta visione del fenomeno 
cometario rimase in voga si¬ 
no al XVII secolo e, grande¬ 
mente amplificata e distorta 
nei periodi dal medioevo al 
rinascimento, fece da «sup¬ 
porto tecnico» alla supersti¬ 
zione e ad incredibili millan¬ 
terie degne di Buffalmacco 
e Calandrino. 


Ma alfine gli studi di Coper¬ 
nico, Keplero, Hevelius, 
Newton e «l'uomo cometa» 
Edmond Halley hanno ripor¬ 
tato alla luce la vera, splen¬ 
dida natura di Halley che dai 
più remoti spazi di Nettuno 
ritorna periodicamente a 
trovarci per regalarci la poe¬ 
sia dell'infinito. 


IL PROGRAMMA 


Il «menù» di Halley comprende le seguenti pagine: 

1 - Periodi di avvistamento 

2 - Cinque Robot per una cometa 

3 - Composizione cometaria 
4-129 passaggi documentati 

5 - Grafico del gennaio 1986 

6 - Ultimissime su Halley 

7 - L'astronomo Edmond Halley 

Le istruzioni sono contenute interamente nel program¬ 
ma e naturalmente ... OCCHIO AL CIELO! 
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ASTRONOMIA-DIDATTICO 

di O. Contenti 



10 CALL CLEAR 
20 CALL SCREEN (2) 

30 A*«"orizzonte.in.gradi * 

40 CALL COLOR(2,12,1) 

50 CALL COLOR <5,3 1 1) 

60 CALL COLOR(6,3,1) 

70 CALL COLOR(7,3,1) 

60 CALL COLOR(8,3,1) 

90 CALL COLOR(9,2,I> 

100 CALL COLOR(10,2,1) 

110 CALL COLOR(11,2,1) 

120 CALL COLOR(12,2,1) 

130 PRINT TAB(7);"COMETA DI HALLEY":! 

140 PRINT TAB(3)|‘taccuino per un incont 
ro": i 

150 PRINT TAB(8)j*di o. contenti•« si 1111 

i : 

160 CALL CHAR(128, M 401044108A200B03 a ) 

170 CALL COLOR(13,12,1) 

180 FOR F*1 TO 74 
190 X-X-0.09 
200 CO-SIN(X)*13 
210 RI«C0S(X)*8 

220 CALL HCHAR(RI+12,C0+16,128) 

230 CALL SOUND(-1000,200+F,20,784+F,28,9 
88+F,28,-8,28) 

240 CALL HCHAR (RI-M2, CO + 16,32> 

250 NEXT F 

260 CALL HCHAR(RI+12,C0+16,128) 

270 FOR F*2 TO 30 

280 CALL SOUND(—1000,110,F,—5,F) 

290 CALL COLOR(9,INT(F/2),1) 

300 CALL COLOR(10,INT(F/2),1) 

310 CALL COLOR<ll,INT(F/2),1) 

320 NEXT F 

330 FOR F=1 TO 2000 

340 NEXT F 

350 NT-220 

360 CALL CLEAR 

370 CALL SCREEN(14) 

380 FOR F-l TO 5 

390 CALL SOUND(10,NT,15) 

400 NT-NT-20 
410 NEXT F 
420 HENU-1 
430 A-16 
440 B*16 
450 C-12 

460 CALL COLORII,A,1) 

470 CALL COLOR(2,A, 1) 

480 CALL C0L0R(3,B, 1) 

490 CALL COLOR(4 , B, 1 ) 

500 CALL COLOR(5,A, 1 ) 

510 CALL COLOR(6,A, 1 ) 

520 CALL COLOR(7,A, 1 > 

530 CALL COLOR(8,A, 1 ) 

540 CALL COLOR(9,C, 1 ) 

550 CALL COLOR(10,C , 1 ) 

560 CALL C0L0R(11,C,1) 

570 CALL COLOR(12,C, 1 > 

580 IF MENU-1 THEN 600 

590 ON K-48 GOTO 910,1190,1660,2220,2440 

,3080,3290 

600 PRINT TAB(7);"MENU DI HALLEY":: 

610 PRINT "PAGINA 1.TASTO 1 p 

eriodi di avvi stafflento”: : 

620 PRINT "PAGINA 2.TASTO 2 c 

inque robot per una cometa"!: 

630 PRINT “PAGINA 3.TASTO 3 c 

omposizione cometaria"!! 

640 PRINT "PAGINA 4.TASTO 4 i 

29 passaggi documentati " i ■ 

650 PRINT "PAGINA 5.TASTO 5 g 

rabico del gennaio 1986"!! 

660 PRINT "PAGINA 6.TASTO 6 u 

ltimissime su hailey”: : 

670 PRINT “PAGINA 7.TASTO 7 1 

'astronomo edmond halley" 

680 CALL KEY(0,K,S) 


690 IF K = 49 THEN 770 
700 IF K«50 THEN 840 
710 IF K-51 THEN 1600 
720 IF K*52 THEN 2150 
730 IF K-53 THEN 2370 
740 IF K«54 THEN 3010 
750 IF K-55 THEN 3220 
760 60T0 680 
770 CALL CLEAR 
780 CALL SCREEN(2> 

790 A-16 

800 B-3 

810 C-l1 

820 MENU-2 

830 60T0 460 

840 CALL CLEAR 

850 CALL SCREEN(6) 

860 A-16 
870 B-16 
880 C*2 
890 MENU-2 
900 GOTO 460 

910 PRINT TAB(6)j"COMETA DI HALLEY" 

920 PRINT TAB(2)|"(periodi di avvistaeen 
to)"li 

930 PRINT "GENNAIO-OTTOBRE 1985 i 

1 corpo della cometa ti percepisce so 
lo dagli” 

940 PRINT "osservatori astronomici."ii 
950 PRINT "NOVEMBRE 1985 s 

i giunge al 1'avvistaaento con telescopi 
amatori ali.*!: 


960 PRINT "DICEMBRE 1985 
' plausibile 1‘utilizzo 
"l « 

970 PRINT "6ENNAI0 1986 
otrebbe essere visibile 


e 

dei binocoli. 

P 

ad occhio nud 


o,scomparendo" 

980 PRINT ‘dal giorno 25 per passare a 
11'emisfero sub-equatoriale. 


990 PRINT "(continua : premi un tasto)" 
1000 CALL KEY (0,K,S) 

1010 RANDOHIZE 

1020 SO*INT(1650*RND*110) 

1030 CALL SOUND(-100,SO,10) 

1040 IF S«0 THEN 1000 

1050 CALL CLEAR 

1060 PRINT "FEBBRAIO 1986 

la cometa passa il giorno 9 al perielio 

del sole e verso" 

1070 PRINT "fine mese e' ri avvi stabi 1 e." 


! ! 

1080 PRINT "MARZO 1986 

halley viene visitata dalle 5 sonde terr 

estri. " : i 

1090 PRINT "APRILE 1986 

il giorno 11 la cometa si trova nel pu 

nto piu' vicino" 

1100 PRINT "alla terra (KM 62.832.000), 

1'avvistamento e' difficile."ii 
1110 PRINT ‘HA6GI0 1986 
e‘ ancora possibile vederla con binocoli 
o piccoli tele-" 

1120 PRINT "scopi prima del prossimo 
incontro nel 2062."i: 

1130 PRINT ‘. 

spremi un tasto per il menu" 

1140 CALL KEY(0,K,S) 

1150 RANDOMIZE 

1160 SO*INT(1650*RND+110) 

1170 CALL SOUND(—100,S0,10) 

UBO IF S*0 THEN 1140 ELSE 350 

1190 PRINT TAB(3);"LA SONDA EUROPEA GIOT 

TO" * i 

1200 PRINT "trae il suo nome dal famoso 
allievo del cimabue che per primo raffig 
uro' una cometa" 

1210 PRINT "(proprio quella di HALLEY), 


nell affresco sito a paaova raffigurante 
1'adorazione dei magi." 

1220 PRINT "il robot sara' lanciato il 
10 luglio 1985 dal vettore ARIANE-2 dal* 
la guyana fran-" 

1230 PRINT "cese ed avra' il compito di 
passare,il 13 marzo 1986,a meno di 500 
chilometri dal" 

1240 PRINT "nucleo,riportando a terra 
alla velocita' di 40 Kbit alsecondo i da 
ti relativi alla" 

1250 PRINT "COMPOSIZIONE MOLECOLARE del¬ 
la cometa,peso e flusso del-le POLVERI,n 
onche' immagini" 

1260 PRINT "del nucleo con una risolu¬ 
zione di 50 metri. (CONTINUA)" 

1270 CALL KEY(0,K,S) 

1280 RANDOMIZE 

1290 S0-INT(1650*RND+110) 

1300 CALL S0UND(10,SO,10) 

1310 IF S*0 THEN 1270 
1320 CALL CLEAR 

1330 PRINT TAB(2)j"LE 2 SONDE SOVIETICHE 
VEGA"ii 

1340 PRINT "dopo aver sorvolato VENERE e 
avervi fatto cadere un hodu-lo d'atterra 
ggio e un palio-" 

1350 PRINT "ne per ri levamenti,le vega 
s'involeranno verso halley per raggiung 
erla il 6 e 9* 

1360 PRINT "marzo 1986,ri spetti vanente a 
10 MILA e 3 MILA chilometri di distanza 
ove opereranno" 

1370 PRINT ‘con rilevamenti e immagini 
in una risoluzione di M. 200*:: 

1380 PRINT ". 

1390 PRINT "(continua : premi un tasto)" 

: : : 

1400 CALL KEY(0,K,S) 

1410 RANDOMIZE 

1420 S0*INT(1650»RND+110) 

1430 CALL SOUND(10,50,10) 

1440 IF S-0 THEN 1400 
1450 CALL CLEAR 

1460 PRINT TAB(2)|"LA SONDA NIPPONICA PL 
ANET-A":i 

1470 PRINT "la planet-a passera' 1*8 
marzo 1986 a 200 MILA chilo-metri da hai 
ley scrutandola" 

1480 PRINT "con una telecamera a raggi 
ULTRAVIOLETTI indirizzata sulla nuvola 
di idrogeno che" 

1490 PRINT "circonda la cometa.*::! 

1500 PRINT TAB(3)|"IL SATELLITE USA 1SEE 
-3" : t 

1510 PRINT "la sonda ribattezzata ICE 
sara' dirottata dalla sua orbita origi 
naria per giun-" 

1520 PRINT "gere 1*11 settembre 1985 a 
soli 3 MILA chilometri dallacometa GIACO 
BINI-ZINNER per" 

1530 PRINT "poi immergersi,il 28 marzo 
1986,nella coda di halley." 

1540 PRINT ". 

spremi un tasto per il menu* 

1550 CALL KEY(0,K,S) 

1560 RANDOMIZE 

1570 S0-INT(1650*RND+110) 

1580 CALL SOUND(10,SO,10) 

1590 IF S-0 THEN 1550 ELSE 350 
1600 CALL CLEAR 
1610 CALL SCREEN(16) 

1620 A-3 

1630 C-14 

1640 MENU-2 

1650 GOTO 460 

1660 CALL COLOR(13,12,1) 

1670 CALL COLOR(2,16,1) 
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LA COMETA DI HALLEY 


1680 CALL COLOR(14,12,1) 

1690 CALL COLOR(15,7,12) 

1700 CALL CHAR(128,*00000103070F1F3F") 
1710 CALL CHAR(129,"1F7FFFFFFFFFFFFF“) 
1720 CALL CHAR(130,"F8FEFFFFFFFFFFFF"> 
1730 CALL CHARt131,"FF008FC0E3F0F8FC") 
1740 CALL CHAR(132,"3F7F7FFFFFFFFFFF") 
1750 CALL CHAR(133,"FCFEFEFFFFFFFFFF") 
1760 CALL CHAR(134,"FFFFFFFFFF7F7F3F") 
1770 CALL CHAR(135,“FFFFFFFFFFFEFEFC") 
1780 CALL CHAR(136,“3FlF0F070301 ") 

1790 CALL CHAR(137,"FFFFFFFFFFFF7F1F") 
1800 CALL CHAR(13B,“7F7F7F7F7F7F7E7B“) 
1810 CALL CHAR(139,“FCF8F1EOC7803F") 

1820 CALL CHAR ( 144,"071F3F7F7FFFFFFF") 
1830 CALL CHAR(145,’E0F8FCFEFEFFFFFF") 
1840 CALL CHAR(146,"FFFFFF7F7F3F1F07") 
1850 CALL CHAR(147,"FFFFFF7E7E7C7B6") 
1860 CALL CHAR(140,"808080808080808") 
1870 CALL CHAR(141,“FFOOFFOOFFOOFF") 

1880 DATA 128,129,130,131,132,144,145,13 
3,134,146,147,135,136,137,138,139 
1890 RESTORE 

1900 PRINT TAB(3);"COMPOSIZIONE COMETARI 
A’:: 

1910 PRINT TA8(3)j"CHI0HA:azoto_carbonio 

1920 PRINT TAB(3);"idrogeno_ossigeno_pol 
veri_* 

1930 PRINT TAB(3)j"sodio tonizzato,": : : « 
:::::: 

1940 PRINT "NUCLEO:polveri^.,CODA:vento 
rocce_neteoriti..e pressioneTerrose_ghia 
ccio.radioatti va" 

1950 PRINT "di gas_ghiaccio..solare spo_ 

d'acqua,.stano i gas" 

I960 PRINT TAB(17>;"del 1 a chioma" 

1970 PRINT TAB(12)j"formando la coda,":: 
1980 PRINT "_preai un tasto per il menu_ 

1990 FOR F«9 TO 12 
2000 FOR FI=6 TO 9 
2010 READ COM 
2020 CALL HCHAR(F,FI,COM) 

2030 CALL SOUND < — 10 ,C0M-*-100, IO) 

2040 NEXT FI 

2050 NEXT F 

2060 FOR F-9 TO 12 

2070 CALL HCHAR(F,10,141,17) 

2080 CALL SOUND( —100,—5,F) 

2090 NEXT F 

2100 CALL VCHAR(13,8,140,2) 

2110 CALL VCHAR(13,22,140,2) 

2120 CALL VCHAR(6,7,140,3) 

2130 CALL KEY(0,K,S) 

2140 IF S-0 THEN 2130 ELSE 350 
2150 CALL CLEAR 
2160 CALL SCREEN(12) 

2170 A-9 

2180 B-5 

2190 C-13 

2200 MENU-2 

2210 60T0 460 

2220 NT-8000 

2230 FOR F-l TO 20 

2240 CALL SOUND(20,NT,10) 

2250 NT-NT-68 
2260 NEXT F 

2270 PRINT "DAGLI SCRITTI DI HA TUA-LIN: 
": : 

2280 PRINT "prilla osservazione accertata 
della cometa halley compiutalo cina nell 
'anno 240 a.C.":: 

2290 PRINT "-NEL SETTIMO ANNO DEL REGNO 
DI SHIH-HUANG UNA COMETA AP-PARVE DAPPRI 
MA A EST." 

2300 PRINT "FU POI VISTA A NORD. 

NELLA QUINTA LUNA FU VISTA PER SEDICI 6 
IORNI A OVEST.":: 

2310 PRINT "i ventinove avvistamenti*:: 


2320 PRINT "240 a.C.-164 a.C.-87 a.C.- 
12 a.C.-66-141-218-295-374- 451-530-607- 
684-760-837-912-* 

2330 PRINT *989-1066-1145-1222-1301-1378 
-1456-1531-1607-1682-1759- 1835-1910-." 

: : 

2340 PRINT "-premi un tasto per il menu- 

2350 CALL KEY(0,K,S> 

2360 IF S-0 THEN 2350 ELSE 350 
2370 CALL CLEAR 
2380 CALL SCREEN(9) 

2390 A-16 

2400 B-16 

2410 C-2 

2420 MENU-2 

2430 GOTO 460 

2440 CALL COLOR(13,12, l ) 

2450 CALL COLOR(14,2,11 ) 

2460 CALL COLOR(l5,5,1) 

2470 CALL COLOR(2,1,1) 

2480 CALL CHAR(128,"401044108A200B03") 
2490 CALL CHAR(129,"COCOCOCOCOCOCOCO" ) 
2500 CALL CHAR(130,"OOOOOOOOOOOOFFFF*) 
2510 CALL CHAR(131,"C0C0C0C0C0C0FFFF") 
2520 CALL CHAR(132,"441 184230B00FFFF" ) 
2530 CALL CHAR(136,"FFE1E1E1E1E1 ■ ) 

2540 CALL CHAR(137,"FFFFFFFFFFFFFFFF■ ) 
2550 CALL CHAR(138,"FFFFFFFFFFFF" ) 

2560 CALL CHAR(144,"0103070F1F3F7FFF") 
2570 CALL CHAR ( 145,"80C0E0F0F8FCFEFF") 
2580 PRINT TAB(S>|"VISIBILITÀ’ DI HALLEY 

2590 PRINT TAB (5)J"NEL GENNAIO 1986 Ca 1 

ato" 

2600 PRINT ".30.della cometa i giorni]": 
: : : : : : : : 

2610 PRINT TAB(2)|"15.visione serale"::: 
:::::: 

2620 PRINT TAB(4)j"210.220.230.240.250.2 
60 " 

2630 PRINT ".SUD..azimut in gradi..OVEST 
(premi un tasto per il menu>" 

2640 CALL VCHAR(1,6,129,19) 

2650 CALL HCHAR(20,6,131) 

2660 CALL HCHAR(20,7,130,24) 

2670 CALL HCHAR(18,5,53) 

2680 FOR F-l TO LEN(Al) 

2690 CALL HCHAR(2+F,3,ASC(SEGI ( Al,F, 1 ))> 
2700 CALL SOUND <10,F•110 ( 10> 

2710 NEXT F 

2720 FOR F-7 TO 23 STEP 4 
2730 CALL HCHAR(20,F,136) 

2740 CALL HCHAR(20,F+l,138) 

2750 CALL HCHAR(19,F,137,2) 

2760 CALL HCHAR ( 18 ,F, 144) 

2770 CALL HCHARt18.F+1,145) 

2780 CALL SOUND<100,F*40,IO) 

2790 NEXT F 

2800 CALL HCHAR(5,19,128) 

2810 CALL SOUND(100,1760,10) 

2820 CALL HCHAR(5,21,53) 

2830 CALL HCHAR(9,21,128) 

2840 CALL SOUND(100,1319,10) 

2850 CALL HCHAR(9,23,49) 

2860 CALL HCHAR<9,24,48> 

2870 CALL HCHAR(12,23,128) 

2880 CALL SOUND(100,698,10) 

2890 CALL HCHAR(12,25,49) 

2900 CALL HCHAR(12,26,53) 

2910 CALL HCHAR(16,25,128) 

2920 CALL SOUND(100,392,10) 

2930 CALL HCHAR(16,27,50) 

2940 CALL HCHAR(16,28,48) 

2950 CALL HCHAR(20,27,132) 

2960 CALL SOUND(100,220,10) 

2970 CALL HCHAR(19,28,SO) 

2980 CALL HCHAR(19,29,53) 

2990 CALL KEY(0,K,S) 

3000 IF S-0 THEN 2990 ELSE 350 


3010 CALL CLEAR 
3020 CALL SCREEN(3) 

3030 A-16 
3040 B-2 
3050 C-12 
3060 MENU-2 
3070 GOTO 460 

3080 PRINT TAB (5)j"IMMAGINI DEL NUCLEO" 
3090 PRINT "_se il telescopio montato 
sulla sonda giotto,reggerà' al bombardam 
ento di gas e" 

3100 PRINT "polveri (Viaggianti alla ve¬ 
locita' di 68 Km al secondo ,potremmo ave 
re per la prima" 

3110 PRINT "volta le immagini ravvicina¬ 
te del nucleo di una cometa.":: 

3120 PRINT TAB(2)j"L'APPUNTAMENTO CON HA 
LLEY" 

3130 PRINT "..l'effetto razzo della come¬ 
ta potrebbe alterare anche di 4 giorni 
il passaggio" 

3140 PRINT "previsto dagli astronomi."i: 

3150 PRINT "L'OSSERVATORIO DELLO SHUTTLE 

« 

5160 PRINT "_la missione verrà' chiamata 
^STRO-1 e impiegherà' 3 te- lescopi agli 
ultravioletti" 

3170 PRINT "e 2 telecamere a campo largo 
per la radiazione visibile, -premi un ta 
sto per il menu-" 

3180 CALL KEY(0,K,S) 

3190 F-INT ( lOOaRND+1) 

3200 CALL SOUND(F,988,15) 

3210 IF S-0 THEN 3180 ELSE 350 
3220 CALL CLEAR 
3230 CALL SCREEN(8> 

3240 A-16 
3250 B-5 
3260 C-13 
3270 MENU-2 
3280 GOTO 460 
3290 PRINT "":: 

3300 PRINT "astronomo inglese(1656-1742) 
che determino' gli afelii,1eeccentricita 
' dei pianeti e" 

3310 PRINT "calcolo' la distanza dalla 
terra al sole." 

3320 PRINT "dedusse che le comete per¬ 
corrono traiettorie periodi-che e scopri 
il movimento" 

3330 PRINT "proprio delle stelle cosi¬ 
dette fisse)studio' in par- ticolare la 
cometa periodica" 

3340 PRINT "che porta il suo nome,della 
quale predisse il ritorno nel 1785,e c 
alcolo in circa" 

3350 PRINT "75 anni e mezzo il tempo da 
essa impiegato per compiere il giro into 
rno al sole.":: 

3360 PRINT ". 

(premi un tasto per il menu)* 

3370 AR-22 

3380 RESTORE 3500 

3390 FOR F-l TO 13 

3400 READ LE 

3410 FOR FI-10 TO AR 

3420 CALL HCHAR<2,F1-1,32) 

3430 CALL HCHAR(2,FI,LE) 

3440 CALL S0UND<-10,LE«9,20) 

3450 NEXT FI 

3460 AR-AR-1 

3470 NEXT F 

3480 CALL KEY(0,K,S) 

3490 IF S-0 THEN 3480 ELSE 350 

3500 DATA 89,69,76,76,65,72,32,68,78,79, 

77,68,69 


86 


LIST 10/11 



Il piccolo robot racconta 
a Paolo come, sin dai 
primordi, l’uomo abbia 


avuto l’esigenza di 
«computare» e come, 
attraverso le varie civiltà, 
abbia sempre più 
perfezionato i vari metodi 

L mira SOLETE 

realizzati fino ad arrivare 
ai giorni nostri. La quarta 
generazione... 

© Cossu a Marzi i3w 



























































































JLC01T1PUTER CRO¬ 
SCÈ IL SIGPIFICRTO 
PI UflR FflR5E,flE 
FRLWRLGISin- 
TmmcomiL 
EOfììPUTEB PSICO¬ 
LOGO, CHE FDPifTÌU- 
LRnvomnvE 
IO ORSE OLLE RI¬ 
SPOSTE PEL PRZ/Efì 
TE. 


CERflflCAt 
9' 


GARANZ! 

***""» »w• »7.| 

PSICOLOG 




IL COMPUTER, NATO PER FACILI' 
TARE I CALCOLI, A POCOAfOCO 
CI 51 £ RESI CONTO. POTEVAMO" 
RE MILLE USI DIVERSI.FINO A 
DIVENTARE INDISPENSABILE 
ALLA VITA MODERNA IMA... 




EU QUESTO E'STR¬ 
IO SCRITTO Torno 
ESOPO STOT! FOTTI 
FILLI!5.01 0 Uno POE¬ 
TO 0 5YLICOn VOL¬ 
LEY IO COLIFOROIO 

pcnsoRono che un 

COIPPUTER STESSE 
POI/PERO FOCEnPO I 
COPRIGLI ... 

V_ 
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...LR mnR STUPI¬ 
TO wed/‘e il com¬ 
pì itfp, smiFmmn 1 




















































































V. 
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...un topo nmTO 

bhUCIRCCHIRTO CIR¬ 
CE UR TP, RI CODI PI 
RLimERTRZIDfìE PEL 
CRLCOLRTDPE. IL 
SECCHIO. PD5RT0 
SULPRPIfTlEnTTJ.PPiE- 
mEUR SU PI ESSO 
ppiOuocRnpoun 
CORTO CIRCUITO. 


CHE SCHIFO 


Ha mattina 

DOPO A COLA¬ 
ZIONE... 


TU PENSA, TUTTO PER 
UN SECCHIO D'ACQUA, POSATO NELLO 
STESSO PUNTO, ALLA STESSA ORA...ZZZ... 
PER MESI...UNSECCHIO...ZZZ... 
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PARTI OGGI,PAPA'? 
UN'ALTRA SPEDIZIONE 
ARCHEOLOGICA? 




...COSTRUIRONO 
UNA ENORME STRA¬ 
DA NELLA GIUN¬ 
GLA IN ATTESA 
DI UN MITICO UC¬ 
CELLO CHE DOVE¬ 
VA VENIRE DALLE 
STELLE... 


... LA PRESENZA 
NELLE COSTRU¬ 
ZIONI DELLA ZO¬ 
NA DI BAÒSORI- 
LIEVI RAFFIGU- 
H RANTI UOAMNI 
VESTITI IN MO¬ 
DO STRANO CON 
UN ELMO SFE¬ 
RICO... 


DEVO ANDARE 
IN AMERICA DEL SUD, 
DOVE I MAYA... 


j 


r 


Z _ T 


\ X 






"V 


(f[i J £ 


JJ 




...HA SCATENATO LA FANTASIA DEI FANATICI 
DI UFO, CHE HANNO SUBITO IMMAGINATO UNA 
ASTRONAVE CON DEGLI ALIENI MUNITI DI CA¬ 
SCO SPAZIALE. 
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ho già: 





Y^J-A PROSSIMA 

H L rUMcnluOIU rAULU t A CAbA CON 1 bUUI lUt MIOLIUkI AMICI 



111 / I / \ 


PEROGGI HO 
ORGANIZZATO UNA 

s™vGARAPlGE0GRARA o 
- 






OGNUNO HA UN TEST 
DI 10 DOMANDE. LA NAZIONE 
E' EGTRATTA A SORTE. 


QUINDI POTREBBE 
CAPITARE 10 VOLTE 



BENE, QUESTO PRO- 
V GRAMMA LO FACCIAMO FARE A 
MARIO CHE ODIA TANTO LA 
GEOGRAFIA. 




...RUN... 
ECCO FATTO 1 VIENI, 
WC'E’GIA'U DOMANDA! 































































































































□UAL E'LA CAPITALE DEL 
PORTOGALLO? 

? OPORTO 




? OPORTO 

SOMARONE ! RIPROVA 


MA DOVE V, 

SàH'STS 1 

NON HAI MAI 
SENTITO 




toFQ[» ( 
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ABBONATI 

ENTRO QUESTO MESE! 

Riceverai a casa tua 
per un anno 
con uno sconto del 







*D 

O 

C 


£ 


3 -J 
2 * 
o<! 

H > £ 
z ujS: 

o 

p 

z 

O 

o 


O 

O 

O) 

o 

co 

CM 


co 


</) 
* o 
« 2; 
Z o jS 

S* S <0 

« s > 



Oi o 

gii 

O; . 

§ co 

R j= = 


« Li¬ 
ra 


z 
o 

^ «> w 

2 c> 


U) 


8 

O 

O 

CO 

CM 

r- 


IV 


Z * 3 

Orna 

" 1 i 

5 .£ o 






























































m 

! 

i 

N 

« 

© 

C 

; 

> 

1 

I 


u 

2L 





.2. *© 
a z: 
E £ 


J1 

t C 

51 

© tx 

c " 


« 3 


u - 
■a &• 


z. 

£ Q 
N 


x> = ~ 


; u 5 - uj 

£ c i? 2 5 

•» — q .— cr 


o ~ 


uj 2 ° 
N 5 c 
z - 2 
lu . y 
t— 2 E 
a: £ « 
uj E . - 

£ li 

< = " 

© 1/1 
.h © 

D “ 

Sf © 


— © 

° 2 

© 

«5 E 

3 3 

3 c 

à = 
£ ™ 


a p a E 
E i- O 2 
o “J u -6 

io?! 

c ® Z " 
cjO-5 

•?£ < 2 
“I 2 3 
J y ai ■- 
O < < 


E 2 


o fc 
a D 


11 


1- o* 

o 2 
U ° 

o S 


o -2 3 

^ H rr 


5 'r 
£ 


5 ° E - 
*o2« 


© — ~ 


1*5 

51 7 J . I. 

U Z- __J *j 

?25< 
8 6 


* s 

5 ? 

«I 

o 


o - •£ 


•© c 
c .2 

? 3 
« © 
ì x 

t>_ 

- ~o . 

u _ © 

!! E c 


I! 


u I -3 ! 

■s -5 H 

2 « o c 

c * 2 t, 

g.: 2 : 
a 3 1 :: 
5 e | 3 
_ = « .£ 


5 il 


vuoti * Kté 



CAMPAGNA 

ABBONAMENTI 

Alcune note utili per abbonati 
vecchi e nuovi 


Il pagamento, per sottoscrivere 
l’abbonamento annuo, potrà essere inviato a 
mezzo c/c postale (pubblicato in questa 
pagina), vaglia postale o assegno bancario: 
1) per il pagamento a mezzo c/c postale, sarà 
sufficiente compilare il bollettino, sia sul 
fronte che sul retro, in maniera leggibile (a 
macchina o a stampatello) ed effettuare il 
versamento presso un ufficio postale, 
inviando copia dello stesso all’ufficio 
abbonamenti. 

2) per il pagamento a mezzo assegno 
bancario o vaglia postale, questo deve 
essere intestato a Edicomp s.r.l. ed inviato in 
busta chiusa all’ufficio abbonamenti al 
seguente indirizzo: 

Edicomp s.r.l. 

V.le dell’Esperanto, 71 
00144 ROMA EUR 

Per ulteriori informazioni si prega di 
telefonare all’ufficio abbonamenti: 

06/5918895 






Dopo aver risolto il cruciverba anagrammate le lettere nelle caselle contrassegnate con un triangolino 
nell'angolo superiore destro. Avrete un consiglio dalla vostra rivista preferita. 
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PICCOLO DIZIONARIO DEI TERMINI BASIC 

GET Simile all'istruzione INKEY permette di ottenere i dati dalla tastiera 

GOSUB Con questa istruzione è possibile ordinare al computer di eseguire la ri¬ 
ga indicata dal GOSUB. Alla fine della routine incontrando l'istruzione 
RETURN, il programma riprende la normale esecuzione dall'istruzione 
successiva a GOSUB 

GO TO Istruzione simile alla precedente, non consente però l'uso del RETURN 

IFTHEN Istruzione logica (se... allora) associata ad altre istruzioni permette al 
computer di analizzare una situazione ed intraprendere due azioni pos¬ 
sibili in relazione al risultato 

INPUT L'istruzione INPUT consente al computer di trasferire dati in una varia¬ 
bile direttamente dalla tastiera 

INT Funzione numerica (INTero) Restituisce il valore troncato di una varia¬ 
bile rimuovendo tutte le cifre decimali 

LET Parola chiave del linguaggio BASIC poco usata. Assegna un valore ad 
una variabile 

LEFT S Funzione stringa. Permette di leggere una stringa di caratteri partendo 
da sinistra 

LEN Restituisce il numero di caratteri che compongono una stringa 

LIST Funzione di sistema consente di osservare le linee di un programma ed 
apportare eventuali modifiche 

LOG Funzione numerica. Restituisce il valore del LOGaritmo naturale di un 
numero 

LOAD Funzione di sistema presente su svariati computer permette di caricare in 
memoria dati o programmi conservati su supporti magnetici di vario genere. 


ORIZZONTALI 

1) «magazzino» temporaneo di dati. 4) Tra¬ 
pani. 6) Circuito integrato. 8) Alternating 
Current. 10) International Computer Machi¬ 
nes. 12) L'orologio ...Del computer. 17) Una 
delle condizioni logiche. 18) End Of Number. 
19) La «scienza» degli automi. 23)... Vai! 24) 
Transistor-Transistor Logic. 25) Una provin¬ 
cia sarda. 26) Istituto Nazionale Assicurazio¬ 
ni. 27) Settore molto avanzato tecnologica¬ 
mente. 30) Indexed Sequential Language. 
33) End Of Game. 34) La vocale di in...Ripe¬ 
tuta. 36) Escursionisti Esteri. 37) Le prime 
vocali di aiuola. 39) Sono famose le sue ro¬ 
vine. 42) Rete di comunicazione dati britan¬ 
nica. 45) Large Scale Integration. 47) Istru¬ 
zione usata nei terminali di comunicazione. 
49) Long Playing. 51) Il computer più potente 
del mondo. 52) La marca dell'MZ 700. 53) 
Enna. 55) Bologna. 56) Condizione logica. 
58) Fa impazzire i principianti. 60) Half Text. 
61) La marca di computer divenuta lo stan¬ 
dard mondiale... 

VERTICALI 

1) Binary Synchronous Communications. 2) 
Il simbolo del ferro. 3) Rieti. 5) È famoso 
quello dell’IBM. 6) L'effetto omonimo produ¬ 
ce scintille elettriche. 7) Information Center. 
9) Sinonimo di banco oppure tastiera. 11) 
Meno che... mini. 13) Il software francese. 
14) La... chiave. 15) Un tipo di «sort». 16) 
L'inventore dei raggi x. 19) Rete Televisiva 
Europea. 20) Tariffa telefonica per le città 
con popolazione superiore ad un milione di 
abitanti. 21) Istituto Operativo Radiodiffusio¬ 
ni. 22) Associazione Opera Nazionale. 28) 
End Of Text. 29) Isoplanar Injection Register. 
31) Situazione Elettrica Lineare. 32) È famo¬ 
so quello della Visi. 35) Poste e Telecomuni¬ 
cazioni. 38) InfraSonic Recorder. 40) Lo 
«prendono» i dati. 41) Le prime lettere di 
Elehobby. 43) L’altoparlante in inglese. 44) 
Un famoso film di S. Spielberg. 46) Istituto 
Autonomo. 48) Una nota musicale. 50) Un fa¬ 
moso importatore di computers inglese. 54) 
Non Noto. 57) Repubblica Democratica Te¬ 
desca. 59) È sua la legge sulle resistenze. 


LE SOLUZIONI DEL NLJPtRO PRECEDENTE 



SEGA SC 3000 

- SHARP MZ700 

APPLE Ile 

- ZX SPECTRUM 

ATARI 000 

- ELAN ENTERPRISE 











































































































































































UN ANNO DI SUCCESSI 

PROGRAMMI PER IL TUO HOME COMPUTER 


TEXAS TI 99/4A 

GRAN PREMIO 

REACT 

CAPANNELLE 

ORIC 1 

LA FONTANA 
ENTERTAINER RAG 

ZX 81 

INVADERS 

BLACK HOLES 

CACCIA AL TESORO 

CBM64 

SISTEMI LINEARI 

MOONbuggy 

IMPARIAMO LA FISICA 

AL RISTORANTE 
PIATTAFORMA 5 

EQUAZIONI DI II GRADO 

SLALOM 

VIC 20 

ASTEROIDI 

BATTAGLIA NAVALE 

ALIEN DESCENDER 

POKER 

NEBBIA SU VENERE 

INVASIONE 

JAWS 

MASTERMIND 

ZX SPECTRUM 

FROGGY 

CACCIA ALLA BALENA 
BOAT RACE 

SPACE FIGHI 

BIORITMI 

MPF II 

BONUS & MALUS 

OROSCOPO 

AGENDA TELEFONICA 

ENALOTTO 


VIC 20 


SURF 

POESIE.RANDOM 

ORIC 1 

OCCHIO ALLA CIFRA 

TABELLA 

ALIEN 

CALENDARIO 

ARREDAMENTO PER 
CUCINA 

TEXAS TI $9/4A 

SULLA SPIAGGIA 

ZXSPECTRUM 

MOZART 

DATA BASE 

IL MURO 

AZIENDA AGRICOLA 
TENNIS 

SALVATE GLI OMINI 
VALORE E CODICE 
COLORI DELLA 
RESISTENZA 
CALENDARIO 

QUATTRO IN LINEA 

CBM 64 

Ol lARk* 

INTERROGAZIONE DI 
CHIMICA 

SUPER MENÙ 
REGRESSIONE LINEARE 

ZX 81 

MELE 

DELTAPLANO 

BOWLING 

TIRO AL PIATTELLO 

S O S. ATTACCO ALLA 
TERRA 

SEGA SC 3000 

BIORITMI 

CORSO DI BASIC 

SHARP MZ 700 

RIUNISCI LA MUSICA 
ISTOGRAMMI 

LA CASA ABBANDONATA 

MPF II 

DOLCI 

FATTURAZIONE 

TOPI 

MAGAZZINO 

GIOCHIAMO IN BORSA 

QUATTRO IN FILA 


SHARP MZ 700 

YELLOW SUBMARINE 

MASTERMIND 

LABIRINTO 

GRADO DI ARMONIA 


ORIC 1 

HIGH DRIVER 

TRIS 

BANCA 

RALLY 

ISTOGRAMMI 

LA TORRE 

O-X 

ZHORICK 

MOSCA CIECA 
CONVERSIONE 

CBM 64 

ALIMENTATORE 

STABILIZZATO 

ZX 81 

SLALOM 

GULP 

PIATTAFORMA 5 

MEMORIA 

DATABASE 

RINUMERAZIONE 

PROTEZIONE 

EQUAZIONI DI II GRADO 

PROGRAMMI 

MOSTRO 

VIC 20 

ZX SPECTRUM 

IL GUARDIANO DEL 

ELICOTTERO 

TEMPO 

DIAGRAMMI A 

IL SERPENTONE 

COORDINATE POLARI 

INGRANDIMENTO 

SPECTRUM INVADERS 

CARATTERI 

ASTEROIDI 

ROULETTE 

LOGO 

INTELLETTO 

CORSO DI TELEGRAFIA 

BASE ALIENA 



DEFENDER 

ZOMBIE 

TEXAS TI 99/4A 

COMPUTER AIDED 

GINNASTICA AEROBICA 

DESIGN 

LA CONIUGAZIONE DEI 

ALTA VELOCITA 

VERBI 

LEZIONE DI SPAGNOLO 

SHARP MZ 700 

CACCIA AL TESORO 

ORIC 1 

CODER/DECODER 
RENUMBER LINE 
FALCIATRICE/ 

MPF II 

FATTURAZIONE 

MAGAZZINO 

ISTOGRAMMI 

ZX 81 

STANZE 

DAME 

NAVI 

NEVE 

MARZIANETTI 

ZX SPECTRUM 

DINAMITE 

EXTRATERRESTRE 

STATUS 

STRIKE AND BALL 
EQUAZIONI SIMULTANEE 
DECLINAZIONI LATINE 

KONG 

CBM 64 

SOFTWARE SHOP 

INVADER 

FIORI 

VIC 20 

FLYING SIMULATOR 

BIT IL BRUCO 
SINTETIZZATORE 

SFIDA INTERGALATTICA 

BLACK JACK 

SEGA SC 3000 

OTHELLO 

CASCATUTTO 

ROULETTE RUSSA 

CORSO DI BASIC 


ZX SPECTRUM 

LEGGE DI OHM 

IL MURO 

BANANAS 

GIARDINAGGIO 

STENDIAMO IL BUCATO 

LA CACCIA 

CBM64 

COMMODORE 13 
ATTACCO ALLA CITTA 
METEORE 

OCCHIO ALLA CIFRA 

SECA SC 3000 

TOTOCALCIO 
CORSO DI BASIC 

TEXAS TI 99/4A 

AGENDA 
TELEFONICA 
ESTRATTO CONTO 
CONVERSIONE 
COMMODORE/ 

TEXAS 

VIC 20 

IL GALEONE 


CAMPIONATO DI CALCIO 
SERIE A 
MASTERMIND 
ARTICOLI 
DETERMINATIVI 
TABELLINE 
IL VAMPIRO 
FIRE FOX 

MPF II 

SNAKE 

ZX 81 

BACCARAT 
IL CUBO ALFABETICO 
INVASIONE DI TOPI 
LANCIO COL 
PARACADUTE 
SQUASH 

RAPINA IN BANCA 
BREAKOUT 

SHARP MZ 700 

RISOLUZIONE DI 
EQUAZIONI 
CON IL METODO DI 
CRAMER 



ORIC 1 

GRAND PRIX 

VIC 20 

SHARP MZ 700 

ANAGRAMMI 

INCONTRI DI CALCIO 

XXIII OLIMPICS 

TOMBOLA 

TRON 

LABIRINTO MOBILE 
ZGORBYUS 

TEOREMA DI PITAGORA 
TOTOVIC 

SEGA SC 3000 

CACCIA AL 

SOTTOMARINO 

VIDEO PICTURE 

CORSO DI BASIC 

• ZX SPECTRUM 

IL MONASTERO 
MALEDETTO 

ENGLISH TESTER 
TEOREMA DI PITAGORA 

TEXAS TI 99/4A 

LA VENDETTA EDL 
FANTASMA 

ISTOGRAMMI 

IL TRENO ARITMETICO 

ZX 81 

OCCHIO ALLA ZIA 

TIRO ALLE ANATRE 

CBM 64 

TABELLINE SPAZIALI 
SUPER POLPETTA 
OROLOGIO AD ALTA 
RISOLUZIONE 

IL FIUME 

TIRO A SEGNO 
ATTERRAGGIO 

LUNARE 

POKER CON 1 DADI 

NITRO LABIRINTO 

MPF II 

PREZIOSO LETTERE IN 

VIAGGIO NELLO SPAZIO 

SEQUENZA 


COMPLETA LA TUA COLLEZIONE CON LA RACCOLTA 
DI 



1984 


OCCASIONE 


DA NON PERDERE!!! 


IL PAGAMENTO VA EFFETTUATO A MEZZO ASSEGNO BANCARIO, VAGLIA POSTALE O C/C 
POSTALE N. 72609001, INTESTATO A LIST— PROGRAMMI PER IL TUO HOME COMPUTER — 
CASELLA POSTALE 4092 - ROMA APPIO 


























« PRIMO "CENTOPAGINE” 

OI PROGRAMMI PER IL TUO CBM 64 • VIC 20 
• ORIC 1 • MPF/II 

• ZX/81 • ZX/SPECTRUM • TI-90/4A 
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Spese postali comprese 
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